home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / misc / molecule / !MolecDemo / !RunImage < prev    next >
Unknown  |  1992-03-09  |  21.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 30 45 34 |@0000900|0,0000E4|
|00000040| 33 30 00 00 30 e4 00 00 | 8c d4 00 00 30 54 00 00 |30..0...|....0T..|
|00000050| 4c 6f 66 74 79 20 26 20 | 53 74 75 00 0d 00 0a 1d |Lofty & |Stu.....|
|00000060| f4 20 3e 3c 42 65 64 69 | 74 24 70 61 74 68 3e 2e |. ><Bedi|t$path>.|
|00000070| 21 52 75 6e 49 6d 61 67 | 65 0d 00 14 1d f4 20 52 |!RunImag|e..... R|
|00000080| 69 73 63 20 4f 53 20 4d | 6f 6c 65 63 75 6c 65 20 |isc OS M|olecule |
|00000090| 44 72 61 77 65 72 0d 00 | 1e 05 3a 0d 00 28 0d f2 |Drawer..|..:..(..|
|000000a0| 69 6e 69 74 73 77 69 73 | 0d 00 32 0f f2 69 6e 69 |initswis|..2..ini|
|000000b0| 74 61 72 72 61 79 73 0d | 00 3c 11 de 20 6f 75 74 |tarrays.|.<.. out|
|000000c0| 25 20 26 31 38 30 30 30 | 0d 00 46 3b de 20 6f 6b |% &18000|..F;. ok|
|000000d0| 73 25 20 32 3a 24 6f 6b | 73 25 3d 22 4f 4b 22 3a |s% 2:$ok|s%="OK":|
|000000e0| de 20 66 6e 61 6d 65 25 | 20 32 35 35 2c 76 61 6c |. fname%| 255,val|
|000000f0| 69 64 25 20 33 3a 24 76 | 61 6c 69 64 25 3d 22 41 |id% 3:$v|alid%="A|
|00000100| 7e 20 22 0d 00 50 2c de | 20 73 70 72 69 74 65 25 |~ "..P,.| sprite%|
|00000110| 20 32 30 2c 73 70 72 69 | 74 65 32 25 20 32 30 2c | 20,spri|te2% 20,|
|00000120| 73 70 72 69 74 65 5f 74 | 65 78 74 25 20 31 32 0d |sprite_t|ext% 12.|
|00000130| 00 5a 1c 74 69 74 6c 65 | 24 3d 22 4d 6f 6c 65 63 |.Z.title|$="Molec|
|00000140| 75 6c 65 20 44 72 61 77 | 65 72 22 0d 00 64 0e 24 |ule Draw|er"..d.$|
|00000150| 6d 74 3d 74 69 74 6c 65 | 24 0d 00 6e 05 3a 0d 00 |mt=title|$..n.:..|
|00000160| 78 11 24 6e 61 6d 65 25 | 3d 22 54 41 53 4b 22 0d |x.$name%|="TASK".|
|00000170| 00 82 29 c8 99 20 57 5f | 49 6e 69 74 25 2c 32 30 |..).. W_|Init%,20|
|00000180| 30 2c 21 6e 61 6d 65 25 | 2c 74 69 74 6c 65 24 20 |0,!name%|,title$ |
|00000190| b8 20 2c 74 61 73 6b 25 | 0d 00 8c 1b 24 73 70 72 |. ,task%|....$spr|
|000001a0| 69 74 65 32 25 3d 22 73 | 21 4d 6f 6c 65 63 44 65 |ite2%="s|!MolecDe|
|000001b0| 6d 6f 22 0d 00 96 1d 24 | 73 70 72 69 74 65 5f 74 |mo"....$|sprite_t|
|000001c0| 65 78 74 25 3d 22 21 4d | 6f 6c 65 63 75 6c 65 22 |ext%="!M|olecule"|
|000001d0| 0d 00 a0 44 73 69 63 6f | 6e 25 3d a4 69 63 6f 6e |...Dsico|n%=.icon|
|000001e0| 28 2d 31 2c 30 2c 2d 31 | 36 2c 31 34 30 2c 39 32 |(-1,0,-1|6,140,92|
|000001f0| 2c 26 31 37 30 30 33 31 | 32 42 2c 73 70 72 69 74 |,&170031|2B,sprit|
|00000200| 65 5f 74 65 78 74 25 2c | 73 70 72 69 74 65 32 25 |e_text%,|sprite2%|
|00000210| 2c 31 31 29 0d 00 aa 32 | 53 25 3d 8e 20 22 3c 4d |,11)...2|S%=. "<M|
|00000220| 6f 6c 65 63 44 65 6d 6f | 24 44 69 72 3e 2e 53 70 |olecDemo|$Dir>.Sp|
|00000230| 72 69 74 65 73 22 3a 54 | 25 3d a2 23 53 25 2b 31 |rites":T|%=.#S%+1|
|00000240| 36 3a d9 23 53 25 0d 00 | b4 24 de 20 73 70 20 54 |6:.#S%..|.$. sp T|
|00000250| 25 2c 66 61 63 74 6f 72 | 73 25 20 31 35 2c 70 69 |%,factor|s% 15,pi|
|00000260| 78 74 72 61 6e 73 25 20 | 31 36 0d 00 be 22 21 73 |xtrans% |16..."!s|
|00000270| 70 3d 54 25 3a 73 70 21 | 34 3d 30 3a 73 70 21 38 |p=T%:sp!|4=0:sp!8|
|00000280| 3d 31 36 3a 73 70 21 31 | 32 3d 31 36 0d 00 c8 16 |=16:sp!1|2=16....|
|00000290| c8 99 20 4f 53 5f 53 4f | 70 25 2c 26 31 30 39 2c |.. OS_SO|p%,&109,|
|000002a0| 73 70 0d 00 d2 30 c8 99 | 20 4f 53 5f 53 4f 70 25 |sp...0..| OS_SOp%|
|000002b0| 2c 26 31 30 41 2c 73 70 | 2c 22 3c 4d 6f 6c 65 63 |,&10A,sp|,"<Molec|
|000002c0| 44 65 6d 6f 24 44 69 72 | 3e 2e 53 70 72 69 74 65 |Demo$Dir|>.Sprite|
|000002d0| 73 22 0d 00 dc 0e de 20 | 53 41 25 20 31 30 32 34 |s"..... |SA% 1024|
|000002e0| 0d 00 e6 14 e7 20 28 53 | 41 25 20 83 20 34 29 3c |..... (S|A% . 4)<|
|000002f0| 3e 30 20 8c 0d 00 f0 1b | 73 61 76 65 61 72 65 61 |>0 .....|savearea|
|00000300| 25 3d 34 2a 28 53 41 25 | 20 81 20 34 29 2b 34 0d |%=4*(SA%| . 4)+4.|
|00000310| 00 fa 05 cc 0d 01 04 11 | 73 61 76 65 61 72 65 61 |........|savearea|
|00000320| 25 3d 53 41 25 0d 01 0e | 05 cd 0d 01 18 11 73 61 |%=SA%...|......sa|
|00000330| 76 65 61 72 65 61 25 21 | 30 3d 30 0d 01 22 11 f2 |vearea%!|0=0.."..|
|00000340| 6c 6f 61 64 5f 77 69 6e | 64 6f 77 73 0d 01 2c 10 |load_win|dows..,.|
|00000350| f2 67 65 74 6d 6f 64 65 | 69 6e 66 6f 0d 01 36 0f |.getmode|info..6.|
|00000360| f2 69 6e 69 74 69 61 6c | 69 73 65 0d 01 40 27 74 |.initial|ise..@'t|
|00000370| 65 6d 70 25 21 30 3d 6d | 61 69 6e 25 3a c8 99 20 |emp%!0=m|ain%:.. |
|00000380| 57 5f 47 65 74 57 49 6e | 66 6f 25 2c 2c 74 65 6d |W_GetWIn|fo%,,tem|
|00000390| 70 25 0d 01 4a 0f 74 65 | 6d 70 25 21 32 38 3d 2d |p%..J.te|mp%!28=-|
|000003a0| 31 0d 01 54 19 24 28 74 | 65 6d 70 25 21 37 36 29 |1..T.$(t|emp%!76)|
|000003b0| 3d 4d 6f 6c 65 63 75 6c | 65 24 0d 01 5e 0b f2 72 |=Molecul|e$..^..r|
|000003c0| 65 63 61 6c 63 0d 01 68 | 14 f2 6f 70 65 6e 77 69 |ecalc..h|..openwi|
|000003d0| 6e 64 28 6d 61 69 6e 25 | 29 0d 01 72 14 f2 6f 70 |nd(main%|)..r..op|
|000003e0| 65 6e 77 69 6e 64 28 70 | 61 6e 65 25 29 0d 01 7c |enwind(p|ane%)..||
|000003f0| 0b 6f 70 65 6e 25 3d b9 | 0d 01 86 18 ee 20 85 20 |.open%=.|..... . |
|00000400| e7 20 a4 77 69 6d 70 65 | 72 72 6f 72 20 8c 20 e0 |. .wimpe|rror . .|
|00000410| 0d 01 90 05 f5 0d 01 9a | 1c c8 99 20 57 5f 50 6f |........|... W_Po|
|00000420| 6c 6c 25 2c 2c 62 25 20 | b8 20 72 65 61 73 6f 6e |ll%,,b% |. reason|
|00000430| 25 0d 01 a4 10 c8 8e 20 | 72 65 61 73 6f 6e 25 20 |%...... |reason% |
|00000440| ca 0d 01 ae 15 c9 20 31 | 20 3a 20 f2 72 65 64 72 |...... 1| : .redr|
|00000450| 61 77 28 62 25 29 0d 01 | b8 13 c9 20 32 20 3a 20 |aw(b%)..|... 2 : |
|00000460| f2 6f 70 65 6e 28 62 25 | 29 0d 01 c2 14 c9 20 33 |.open(b%|)..... 3|
|00000470| 20 3a 20 f2 63 6c 6f 73 | 65 28 62 25 29 0d 01 cc | : .clos|e(b%)...|
|00000480| 1a c9 20 34 20 3a 20 f2 | 64 65 66 61 75 6c 74 5f |.. 4 : .|default_|
|00000490| 70 6f 69 6e 74 65 72 0d | 01 d6 23 c9 20 35 20 3a |pointer.|..#. 5 :|
|000004a0| 20 e7 20 21 62 25 3d 6d | 61 69 6e 25 20 8c 20 f2 | . !b%=m|ain% . .|
|000004b0| 6d 79 5f 70 6f 69 6e 74 | 65 72 0d 01 e0 16 c9 20 |my_point|er..... |
|000004c0| 36 20 3a 20 f2 62 75 74 | 74 6f 6e 73 28 62 25 29 |6 : .but|tons(b%)|
|000004d0| 0d 01 ea 12 c9 20 38 20 | 3a 20 f2 6b 65 79 28 62 |..... 8 |: .key(b|
|000004e0| 25 29 0d 01 f4 19 c9 20 | 39 20 3a 20 f2 6d 65 6e |%)..... |9 : .men|
|000004f0| 75 73 65 6c 65 63 74 28 | 62 25 29 0d 01 fe 18 c9 |uselect(|b%).....|
|00000500| 20 31 37 2c 31 38 3a f2 | 72 65 63 65 69 76 65 28 | 17,18:.|receive(|
|00000510| 62 25 29 0d 02 08 05 cb | 0d 02 12 0d fd 20 71 75 |b%).....|..... qu|
|00000520| 69 74 25 3d b9 0d 02 1c | 1d c8 99 20 22 57 69 6d |it%=....|... "Wim|
|00000530| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 2c 74 61 73 |p_CloseD|own",tas|
|00000540| 6b 25 0d 02 26 05 e0 0d | 02 30 05 3a 0d 02 3a 13 |k%..&...|.0.:..:.|
|00000550| dd 20 f2 6c 6f 61 64 5f | 77 69 6e 64 6f 77 73 0d |. .load_|windows.|
|00000560| 02 44 2c c8 99 20 57 5f | 4f 70 65 6e 54 25 2c 2c |.D,.. W_|OpenT%,,|
|00000570| 22 3c 4d 6f 6c 65 63 44 | 65 6d 6f 24 44 69 72 3e |"<MolecD|emo$Dir>|
|00000580| 2e 54 65 6d 70 6c 61 74 | 65 73 22 0d 02 4e 3b c8 |.Templat|es"..N;.|
|00000590| 99 20 57 5f 4c 6f 61 64 | 54 25 2c 2c 69 6e 66 6f |. W_Load|T%,,info|
|000005a0| 62 6c 6b 25 2c 69 6e 64 | 25 2c 69 6e 64 65 6e 64 |blk%,ind|%,indend|
|000005b0| 25 2c 2d 31 2c 22 49 6e | 66 6f 22 2c 30 20 b8 20 |%,-1,"In|fo",0 . |
|000005c0| 2c 2c 69 6e 64 25 0d 02 | 58 23 c8 99 20 57 5f 43 |,,ind%..|X#.. W_C|
|000005d0| 72 65 61 74 65 57 25 2c | 2c 69 6e 66 6f 62 6c 6b |reateW%,|,infoblk|
|000005e0| 25 20 b8 20 69 6e 66 6f | 25 0d 02 62 3b c8 99 20 |% . info|%..b;.. |
|000005f0| 57 5f 4c 6f 61 64 54 25 | 2c 2c 69 6e 66 6f 62 6c |W_LoadT%|,,infobl|
|00000600| 6b 25 2c 69 6e 64 25 2c | 69 6e 64 65 6e 64 25 2c |k%,ind%,|indend%,|
|00000610| 2d 31 2c 22 50 61 6e 65 | 22 2c 30 20 b8 20 2c 2c |-1,"Pane|",0 . ,,|
|00000620| 69 6e 64 25 0d 02 6c 23 | c8 99 20 57 5f 43 72 65 |ind%..l#|.. W_Cre|
|00000630| 61 74 65 57 25 2c 2c 69 | 6e 66 6f 62 6c 6b 25 20 |ateW%,,i|nfoblk% |
|00000640| b8 20 70 61 6e 65 25 0d | 02 76 40 c8 99 20 57 5f |. pane%.|.v@.. W_|
|00000650| 4c 6f 61 64 54 25 2c 2c | 69 6e 66 6f 62 6c 6b 25 |LoadT%,,|infoblk%|
|00000660| 2c 69 6e 64 25 2c 69 6e | 64 65 6e 64 25 2c 2d 31 |,ind%,in|dend%,-1|
|00000670| 2c 22 43 6f 6e 73 74 61 | 6e 74 73 22 2c 30 20 b8 |,"Consta|nts",0 .|
|00000680| 20 2c 2c 69 6e 64 25 0d | 02 80 28 c8 99 20 57 5f | ,,ind%.|..(.. W_|
|00000690| 43 72 65 61 74 65 57 25 | 2c 2c 69 6e 66 6f 62 6c |CreateW%|,,infobl|
|000006a0| 6b 25 20 b8 20 63 6f 6e | 73 74 61 6e 74 73 25 0d |k% . con|stants%.|
|000006b0| 02 8a 3b c8 99 20 57 5f | 4c 6f 61 64 54 25 2c 2c |..;.. W_|LoadT%,,|
|000006c0| 69 6e 66 6f 62 6c 6b 25 | 2c 69 6e 64 25 2c 69 6e |infoblk%|,ind%,in|
|000006d0| 64 65 6e 64 25 2c 2d 31 | 2c 22 4d 61 69 6e 22 2c |dend%,-1|,"Main",|
|000006e0| 30 20 b8 20 2c 2c 69 6e | 64 25 0d 02 94 23 c8 99 |0 . ,,in|d%...#..|
|000006f0| 20 57 5f 43 72 65 61 74 | 65 57 25 2c 2c 69 6e 66 | W_Creat|eW%,,inf|
|00000700| 6f 62 6c 6b 25 20 b8 20 | 6d 61 69 6e 25 0d 02 9e |oblk% . |main%...|
|00000710| 10 c8 99 20 57 5f 43 6c | 6f 73 65 54 25 0d 02 a8 |... W_Cl|oseT%...|
|00000720| 05 e1 0d 02 b2 05 3a 0d | 02 bc 0f dd 20 f2 69 6e |......:.|.... .in|
|00000730| 69 74 73 77 69 73 0d 02 | c6 18 57 69 6d 70 25 3d |itswis..|..Wimp%=|
|00000740| 28 31 3c 3c 31 38 29 2b | 28 33 3c 3c 36 29 0d 02 |(1<<18)+|(3<<6)..|
|00000750| d0 11 57 5f 49 6e 69 74 | 25 3d 57 69 6d 70 25 0d |..W_Init|%=Wimp%.|
|00000760| 02 da 16 57 5f 43 72 65 | 61 74 65 57 25 3d 57 69 |...W_Cre|ateW%=Wi|
|00000770| 6d 70 25 2b 31 0d 02 e4 | 16 57 5f 43 72 65 61 74 |mp%+1...|.W_Creat|
|00000780| 65 49 25 3d 57 69 6d 70 | 25 2b 32 0d 02 ee 14 57 |eI%=Wimp|%+2....W|
|00000790| 5f 4f 70 65 6e 57 25 3d | 57 69 6d 70 25 2b 35 0d |_OpenW%=|Wimp%+5.|
|000007a0| 02 f8 15 57 5f 43 6c 6f | 73 65 57 25 3d 57 69 6d |...W_Clo|seW%=Wim|
|000007b0| 70 25 2b 36 0d 03 02 13 | 57 5f 50 6f 6c 6c 25 3d |p%+6....|W_Poll%=|
|000007c0| 57 69 6d 70 25 2b 37 0d | 03 0c 19 57 5f 47 65 74 |Wimp%+7.|...W_Get|
|000007d0| 57 53 74 61 74 65 25 3d | 57 69 6d 70 25 2b 31 31 |WState%=|Wimp%+11|
|000007e0| 0d 03 16 18 57 5f 47 65 | 74 57 49 6e 66 6f 25 3d |....W_Ge|tWInfo%=|
|000007f0| 57 69 6d 70 25 2b 31 32 | 0d 03 20 19 57 5f 53 65 |Wimp%+12|.. .W_Se|
|00000800| 74 49 53 74 61 74 65 25 | 3d 57 69 6d 70 25 2b 31 |tIState%|=Wimp%+1|
|00000810| 33 0d 03 2a 19 57 5f 47 | 65 74 49 53 74 61 74 65 |3..*.W_G|etIState|
|00000820| 25 3d 57 69 6d 70 25 2b | 31 34 0d 03 34 1b 57 5f |%=Wimp%+|14..4.W_|
|00000830| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 25 3d 57 69 6d |PointerI|nfo%=Wim|
|00000840| 70 25 2b 31 35 0d 03 3e | 18 57 5f 53 65 74 43 61 |p%+15..>|.W_SetCa|
|00000850| 72 65 74 25 3d 57 69 6d | 70 25 2b 31 38 0d 03 48 |ret%=Wim|p%+18..H|
|00000860| 17 57 5f 43 72 65 61 74 | 65 4d 25 3d 57 69 6d 70 |.W_Creat|eM%=Wimp|
|00000870| 25 2b 32 30 0d 03 52 19 | 57 5f 53 65 74 45 78 74 |%+20..R.|W_SetExt|
|00000880| 65 6e 74 25 3d 57 69 6d | 70 25 2b 32 33 0d 03 5c |ent%=Wim|p%+23..\|
|00000890| 15 57 5f 4f 70 65 6e 54 | 25 3d 57 69 6d 70 25 2b |.W_OpenT|%=Wimp%+|
|000008a0| 32 35 0d 03 66 16 57 5f | 43 6c 6f 73 65 54 25 3d |25..f.W_|CloseT%=|
|000008b0| 57 69 6d 70 25 2b 32 36 | 0d 03 70 15 57 5f 4c 6f |Wimp%+26|..p.W_Lo|
|000008c0| 61 64 54 25 3d 57 69 6d | 70 25 2b 32 37 0d 03 7a |adT%=Wim|p%+27..z|
|000008d0| 1a 57 5f 50 72 6f 63 65 | 73 73 4b 65 79 25 3d 57 |.W_Proce|ssKey%=W|
|000008e0| 69 6d 70 25 2b 32 38 0d | 03 84 18 57 5f 50 6f 6c |imp%+28.|...W_Pol|
|000008f0| 6c 49 64 6c 65 25 3d 57 | 69 6d 70 25 2b 33 33 0d |lIdle%=W|imp%+33.|
|00000900| 03 8e 12 4f 53 5f 52 64 | 54 69 6d 65 25 3d 26 34 |...OS_Rd|Time%=&4|
|00000910| 32 0d 03 98 11 4f 53 5f | 52 64 56 61 72 25 3d 26 |2....OS_|RdVar%=&|
|00000920| 33 35 0d 03 a2 0f 4f 53 | 5f 53 4f 70 25 3d 26 32 |35....OS|_SOp%=&2|
|00000930| 45 0d 03 ac 16 43 54 5f | 53 65 74 47 43 4f 4c 25 |E....CT_|SetGCOL%|
|00000940| 3d 26 34 30 37 34 33 0d | 03 b6 05 e1 0d 03 c0 05 |=&40743.|........|
|00000950| 3a 0d 03 ca 11 dd 20 f2 | 69 6e 69 74 69 61 6c 69 |:..... .|initiali|
|00000960| 73 65 0d 03 d4 0b 71 75 | 69 74 25 3d a3 0d 03 de |se....qu|it%=....|
|00000970| 0b 6f 70 65 6e 25 3d a3 | 0d 03 e8 11 6c 61 73 74 |.open%=.|....last|
|00000980| 73 65 6c 65 63 74 25 3d | 30 0d 03 f2 0f 53 65 6c |select%=|0....Sel|
|00000990| 65 63 74 65 64 25 3d 30 | 0d 03 fc 0f f2 69 6e 69 |ected%=0|.....ini|
|000009a0| 74 63 6f 6e 73 74 73 0d | 04 06 12 f2 69 6e 69 74 |tconsts.|....init|
|000009b0| 33 64 28 41 6e 67 6c 65 | 29 0d 04 10 0f f2 69 6e |3d(Angle|).....in|
|000009c0| 69 74 63 6f 6f 72 64 73 | 0d 04 1a 0e f2 69 6e 69 |itcoords|.....ini|
|000009d0| 74 6d 65 6e 75 73 0d 04 | 24 05 e1 0d 04 2e 05 3a |tmenus..|$......:|
|000009e0| 0d 04 38 11 dd 20 f2 69 | 6e 69 74 61 72 72 61 79 |..8.. .i|nitarray|
|000009f0| 73 0d 04 42 1f de 20 62 | 6c 6f 63 6b 25 20 26 35 |s..B.. b|lock% &5|
|00000a00| 30 30 2c 20 6f 6c 64 62 | 6c 6b 25 20 26 35 30 30 |00, oldb|lk% &500|
|00000a10| 0d 04 4c 1f de 20 69 6e | 66 6f 62 6c 6b 25 20 26 |..L.. in|foblk% &|
|00000a20| 38 30 30 2c 20 69 6e 64 | 25 20 26 32 30 30 30 0d |800, ind|% &2000.|
|00000a30| 04 56 16 69 6e 64 65 6e | 64 25 3d 69 6e 64 25 2b |.V.inden|d%=ind%+|
|00000a40| 26 32 30 30 30 0d 04 60 | 32 de 20 62 25 20 26 35 |&2000..`|2. b% &5|
|00000a50| 30 30 2c 74 65 6d 70 25 | 20 26 35 30 30 2c 6e 61 |00,temp%| &500,na|
|00000a60| 6d 65 25 20 34 2c 6d 65 | 6e 75 25 20 26 34 30 30 |me% 4,me|nu% &400|
|00000a70| 2c 6d 74 20 31 30 30 0d | 04 6a 25 de 20 63 61 72 |,mt 100.|.j%. car|
|00000a80| 65 74 25 20 35 30 2c 74 | 72 61 63 65 25 20 34 30 |et% 50,t|race% 40|
|00000a90| 2c 69 63 6f 6e 62 6c 6b | 25 20 34 30 0d 04 74 23 |,iconblk|% 40..t#|
|00000aa0| de 20 52 6f 74 58 28 32 | 2c 32 29 2c 52 6f 74 59 |. RotX(2|,2),RotY|
|00000ab0| 28 32 2c 32 29 2c 52 6f | 74 5a 28 32 2c 32 29 0d |(2,2),Ro|tZ(2,2).|
|00000ac0| 04 7e 26 de 20 52 6f 74 | 58 32 28 32 2c 32 29 2c |.~&. Rot|X2(2,2),|
|00000ad0| 52 6f 74 59 32 28 32 2c | 32 29 2c 52 6f 74 5a 32 |RotY2(2,|2),RotZ2|
|00000ae0| 28 32 2c 32 29 0d 04 88 | 31 de 20 52 28 32 30 30 |(2,2)...|1. R(200|
|00000af0| 2c 32 29 2c 52 32 28 32 | 30 30 2c 32 29 2c 5a 28 |,2),R2(2|00,2),Z(|
|00000b00| 32 30 30 29 2c 54 28 32 | 30 30 2c 32 29 2c 44 28 |200),T(2|00,2),D(|
|00000b10| 32 30 30 2c 32 29 0d 04 | 92 40 de 20 43 6f 6e 25 |200,2)..|.@. Con%|
|00000b20| 28 32 30 30 2c 35 29 2c | 54 79 70 65 25 28 32 30 |(200,5),|Type%(20|
|00000b30| 30 29 2c 53 65 6c 65 63 | 74 25 28 32 30 30 29 2c |0),Selec|t%(200),|
|00000b40| 42 6f 6e 64 25 28 32 30 | 30 2c 31 29 2c 54 6f 72 |Bond%(20|0,1),Tor|
|00000b50| 25 28 32 30 30 29 0d 04 | 9c 3c de 20 52 61 64 69 |%(200)..|.<. Radi|
|00000b60| 75 73 28 32 29 2c 41 74 | 74 61 63 68 65 64 25 28 |us(2),At|tached%(|
|00000b70| 32 30 30 2c 31 29 2c 4d | 61 69 6e 43 68 61 69 6e |200,1),M|ainChain|
|00000b80| 25 28 32 30 30 2c 32 29 | 2c 43 6f 6e 6e 24 28 34 |%(200,2)|,Conn$(4|
|00000b90| 30 29 0d 04 a6 42 de 20 | 41 28 32 2c 32 29 2c 4f |0)...B. |A(2,2),O|
|00000ba0| 25 28 32 30 30 2c 31 29 | 2c 43 31 28 32 29 2c 43 |%(200,1)|,C1(2),C|
|00000bb0| 32 28 32 29 2c 6e 28 32 | 29 2c 44 31 28 32 29 2c |2(2),n(2|),D1(2),|
|00000bc0| 44 32 28 32 29 2c 55 28 | 32 29 2c 56 28 32 29 2c |D2(2),U(|2),V(2),|
|00000bd0| 57 28 32 29 0d 04 b0 26 | de 20 43 6f 6c 25 28 32 |W(2)...&|. Col%(2|
|00000be0| 30 29 2c 4d 65 6e 75 73 | 25 28 31 30 29 2c 4d 65 |0),Menus|%(10),Me|
|00000bf0| 6e 75 73 24 28 31 30 2c | 35 29 0d 04 ba 2b f4 20 |nus$(10,|5)...+. |
|00000c00| 49 6e 69 74 20 41 72 72 | 61 79 73 20 28 46 6f 72 |Init Arr|ays (For|
|00000c10| 20 52 69 73 63 20 42 61 | 73 69 63 20 43 6f 6d 70 | Risc Ba|sic Comp|
|00000c20| 69 6c 65 72 29 0d 04 c4 | 24 52 6f 74 58 28 29 3d |iler)...|$RotX()=|
|00000c30| 30 2e 30 3a 52 6f 74 59 | 28 29 3d 30 2e 30 3a 52 |0.0:RotY|()=0.0:R|
|00000c40| 6f 74 5a 28 29 3d 30 2e | 30 0d 04 ce 27 52 6f 74 |otZ()=0.|0...'Rot|
|00000c50| 58 32 28 29 3d 30 2e 30 | 3a 52 6f 74 59 32 28 29 |X2()=0.0|:RotY2()|
|00000c60| 3d 30 2e 30 3a 52 6f 74 | 5a 32 28 29 3d 30 2e 30 |=0.0:Rot|Z2()=0.0|
|00000c70| 0d 04 d8 2c 52 28 29 3d | 30 2e 30 3a 52 32 28 29 |...,R()=|0.0:R2()|
|00000c80| 3d 30 2e 30 3a 5a 28 29 | 3d 30 2e 30 3a 54 28 29 |=0.0:Z()|=0.0:T()|
|00000c90| 3d 30 2e 30 3a 44 28 29 | 3d 30 2e 30 0d 04 e2 35 |=0.0:D()|=0.0...5|
|00000ca0| 43 6f 6e 25 28 29 3d 30 | 3a 54 79 70 65 25 28 29 |Con%()=0|:Type%()|
|00000cb0| 3d 30 3a 53 65 6c 65 63 | 74 25 28 29 3d 30 3a 42 |=0:Selec|t%()=0:B|
|00000cc0| 6f 6e 64 25 28 29 3d 30 | 3a 54 6f 72 25 28 29 3d |ond%()=0|:Tor%()=|
|00000cd0| 30 0d 04 ec 38 52 61 64 | 69 75 73 28 29 3d 30 2e |0...8Rad|ius()=0.|
|00000ce0| 30 3a 41 74 74 61 63 68 | 65 64 25 28 29 3d 30 3a |0:Attach|ed%()=0:|
|00000cf0| 4d 61 69 6e 43 68 61 69 | 6e 25 28 29 3d 30 3a 43 |MainChai|n%()=0:C|
|00000d00| 6f 6e 6e 24 28 29 3d 22 | 22 0d 04 f6 0a f7 20 8d |onn$()="|"..... .|
|00000d10| 54 5e 45 0d 05 00 1f e3 | 20 41 25 3d 30 20 b8 20 |T^E.....| A%=0 . |
|00000d20| 31 39 3a f3 20 43 6f 6c | 25 28 41 25 29 3a ed 20 |19:. Col|%(A%):. |
|00000d30| 41 25 0d 05 0a 05 e1 0d | 05 14 05 3a 0d 05 1e 2d |A%......|...:...-|
|00000d40| dc 20 26 46 30 46 30 46 | 30 30 30 2c 26 44 30 44 |. &F0F0F|000,&D0D|
|00000d50| 30 44 30 30 30 2c 26 42 | 30 42 30 42 30 30 30 2c |0D000,&B|0B0B000,|
|00000d60| 26 39 30 39 30 39 30 30 | 30 0d 05 28 2d dc 20 26 |&9090900|0..(-. &|
|00000d70| 37 30 37 30 37 30 30 30 | 2c 26 35 30 35 30 35 30 |70707000|,&505050|
|00000d80| 30 30 2c 26 33 30 33 30 | 33 30 30 30 2c 26 30 30 |00,&3030|3000,&00|
|00000d90| 30 30 30 30 30 30 0d 05 | 32 2d dc 20 26 39 30 34 |000000..|2-. &904|
|00000da0| 30 30 30 30 30 2c 26 30 | 30 45 30 45 30 30 30 2c |00000,&0|0E0E000,|
|00000db0| 26 30 30 43 30 30 30 30 | 30 2c 26 30 30 30 30 44 |&00C0000|0,&0000D|
|00000dc0| 30 30 30 0d 05 3c 2d dc | 20 26 42 30 45 30 45 30 |000..<-.| &B0E0E0|
|00000dd0| 30 30 2c 26 30 30 38 30 | 35 30 30 30 2c 26 30 30 |00,&0080|5000,&00|
|00000de0| 42 30 46 30 30 30 2c 26 | 46 30 42 30 30 30 30 30 |B0F000,&|F0B00000|
|00000df0| 0d 05 46 2d dc 20 26 42 | 38 36 30 38 38 30 30 2c |..F-. &B|8608800,|
|00000e00| 26 38 30 43 30 38 30 30 | 30 2c 26 30 30 38 30 43 |&80C0800|0,&0080C|
|00000e10| 30 30 30 2c 26 37 38 41 | 30 41 30 30 30 0d 05 50 |000,&78A|0A000..P|
|00000e20| 05 3a 0d 05 5a 11 dd 20 | f2 69 6e 69 74 63 6f 6e |.:..Z.. |.initcon|
|00000e30| 73 74 73 0d 05 64 0c 72 | 65 74 72 79 25 3d a3 0d |sts..d.r|etry%=..|
|00000e40| 05 6e 0d 64 72 69 76 65 | 72 25 3d a3 0d 05 78 0e |.n.drive|r%=...x.|
|00000e50| 64 72 69 76 65 72 32 25 | 3d a3 0d 05 82 0d 54 72 |driver2%|=.....Tr|
|00000e60| 61 6e 73 3d 30 2e 31 0d | 05 8c 0c 41 6e 67 6c 65 |ans=0.1.|...Angle|
|00000e70| 3d 31 30 0d 05 96 0d 53 | 63 61 6c 65 3d 32 30 30 |=10....S|cale=200|
|00000e80| 0d 05 a0 0f 53 65 6c 65 | 63 74 25 28 29 3d 30 0d |....Sele|ct%()=0.|
|00000e90| 05 aa 14 77 69 6e 64 25 | 3d 63 6f 6e 73 74 61 6e |...wind%|=constan|
|00000ea0| 74 73 25 0d 05 b4 0e 70 | 72 69 6e 74 66 25 3d 40 |ts%....p|rintf%=@|
|00000eb0| 25 0d 05 be 10 40 25 3d | 26 30 31 30 30 30 34 30 |%....@%=|&0100040|
|00000ec0| 34 0d 05 c8 1b f2 73 65 | 74 76 61 72 69 63 6f 6e |4.....se|tvaricon|
|00000ed0| 28 33 2c c3 28 41 6e 67 | 6c 65 29 29 0d 05 d2 1b |(3,.(Ang|le))....|
|00000ee0| f2 73 65 74 76 61 72 69 | 63 6f 6e 28 34 2c c3 28 |.setvari|con(4,.(|
|00000ef0| 53 63 61 6c 65 29 29 0d | 05 dc 0e 40 25 3d 70 72 |Scale)).|...@%=pr|
|00000f00| 69 6e 74 66 25 0d 05 e6 | 05 e1 0d 05 f0 05 3a 0d |intf%...|......:.|
|00000f10| 05 fa 10 dd 20 f2 69 6e | 69 74 6d 65 6e 75 73 0d |.... .in|itmenus.|
|00000f20| 06 04 14 ea 20 41 25 2c | 42 25 2c 46 25 2c 4e 25 |.... A%,|B%,F%,N%|
|00000f30| 2c 4d 25 0d 06 0e 21 46 | 25 3d 8e 28 22 3c 4d 6f |,M%...!F|%=.("<Mo|
|00000f40| 6c 65 63 44 65 6d 6f 24 | 44 69 72 3e 2e 4d 65 6e |lecDemo$|Dir>.Men|
|00000f50| 75 73 22 29 0d 06 18 2d | 4e 25 3d bb 28 be 23 46 |us")...-|N%=.(.#F|
|00000f60| 25 29 3a e3 20 41 25 3d | 30 20 b8 20 4e 25 3a 4d |%):. A%=|0 . N%:M|
|00000f70| 65 6e 75 73 25 28 41 25 | 29 3d bb 28 be 23 46 25 |enus%(A%|)=.(.#F%|
|00000f80| 29 0d 06 22 32 e3 20 42 | 25 3d 30 20 b8 20 4d 65 |).."2. B|%=0 . Me|
|00000f90| 6e 75 73 25 28 41 25 29 | 3a 4d 65 6e 75 73 24 28 |nus%(A%)|:Menus$(|
|00000fa0| 41 25 2c 42 25 29 3d be | 23 46 25 3a ed 20 42 25 |A%,B%)=.|#F%:. B%|
|00000fb0| 2c 41 25 0d 06 2c 08 d9 | 23 46 25 0d 06 36 05 e1 |,A%..,..|#F%..6..|
|00000fc0| 0d 06 40 05 3a 0d 06 4a | 11 dd 20 f2 69 6e 69 74 |..@.:..J|.. .init|
|00000fd0| 63 6f 6f 72 64 73 0d 06 | 54 0e ea 20 41 25 2c 42 |coords..|T.. A%,B|
|00000fe0| 25 2c 4e 25 0d 06 5e 0a | f7 20 8d 64 74 46 0d 06 |%,N%..^.|. .dtF..|
|00000ff0| 68 13 66 69 6c 65 24 3d | 22 4d 65 74 68 61 6e 65 |h.file$=|"Methane|
|00001000| 22 0d 06 72 0c f3 20 41 | 74 6f 6d 73 25 0d 06 7c |"..r.. A|toms%..||
|00001010| 13 e3 20 41 25 3d 31 20 | b8 20 41 74 6f 6d 73 25 |.. A%=1 |. Atoms%|
|00001020| 0d 06 86 1e e3 20 42 25 | 3d 30 20 b8 20 32 3a f3 |..... B%|=0 . 2:.|
|00001030| 20 52 28 41 25 2c 42 25 | 29 3a ed 20 42 25 0d 06 | R(A%,B%|):. B%..|
|00001040| 90 0f f3 20 54 79 70 65 | 25 28 41 25 29 0d 06 9a |... Type|%(A%)...|
|00001050| 21 e3 20 42 25 3d 30 20 | b8 20 33 3a f3 20 43 6f |!. B%=0 |. 3:. Co|
|00001060| 6e 25 28 41 25 2c 42 25 | 29 3a ed 20 42 25 0d 06 |n%(A%,B%|):. B%..|
|00001070| a4 08 ed 20 41 25 0d 06 | ae 14 77 69 6e 64 25 3d |... A%..|..wind%=|
|00001080| 63 6f 6e 73 74 61 6e 74 | 73 25 0d 06 b8 17 4d 6f |constant|s%....Mo|
|00001090| 6c 65 63 75 6c 65 24 3d | 22 4d 65 74 68 61 6e 65 |lecule$=|"Methane|
|000010a0| 22 0d 06 c2 1c f2 73 65 | 74 76 61 72 69 63 6f 6e |".....se|tvaricon|
|000010b0| 28 35 2c 4d 6f 6c 65 63 | 75 6c 65 24 29 0d 06 cc |(5,Molec|ule$)...|
|000010c0| 14 f2 63 72 65 61 74 65 | 5f 62 6f 6e 64 6c 69 73 |..create|_bondlis|
|000010d0| 74 0d 06 d6 05 e1 0d 06 | e0 05 3a 0d 06 ea 0d f4 |t.......|..:.....|
|000010e0| 20 4d 65 74 68 61 6e 65 | 0d 06 f4 07 dc 20 35 0d | Methane|..... 5.|
|000010f0| 06 fe 27 dc 20 30 2e 30 | 30 30 30 30 2c 30 2e 30 |..'. 0.0|0000,0.0|
|00001100| 30 30 30 30 2c 30 2e 30 | 30 30 30 30 2c 31 2c 32 |0000,0.0|0000,1,2|
|00001110| 2c 33 2c 34 2c 35 0d 07 | 08 28 dc 20 30 2e 33 35 |,3,4,5..|.(. 0.35|
|00001120| 36 35 30 2c 2d 30 2e 39 | 37 31 33 30 2c 30 2e 34 |650,-0.9|7130,0.4|
|00001130| 31 30 31 39 2c 35 2c 31 | 2c 30 2c 30 2c 30 0d 07 |1019,5,1|,0,0,0..|
|00001140| 12 28 dc 20 30 2e 33 31 | 31 39 31 2c 30 2e 30 39 |.(. 0.31|191,0.09|
|00001150| 30 30 32 2c 2d 31 2e 30 | 36 34 36 30 2c 35 2c 31 |002,-1.0|6460,5,1|
|00001160| 2c 30 2c 30 2c 30 0d 07 | 1c 27 dc 20 30 2e 34 34 |,0,0,0..|.'. 0.44|
|00001170| 31 36 36 2c 30 2e 38 33 | 35 35 30 2c 30 2e 35 38 |166,0.83|550,0.58|
|00001180| 37 39 31 2c 35 2c 31 2c | 30 2c 30 2c 30 0d 07 26 |791,5,1,|0,0,0..&|
|00001190| 28 dc 20 2d 31 2e 31 31 | 30 30 37 2c 30 2e 30 34 |(. -1.11|007,0.04|
|000011a0| 35 37 38 2c 30 2e 30 36 | 36 35 30 2c 35 2c 31 2c |578,0.06|650,5,1,|
|000011b0| 30 2c 30 2c 30 0d 07 30 | 05 3a 0d 07 3a 21 dd 20 |0,0,0..0|.:..:!. |
|000011c0| a4 6d 61 78 30 28 61 25 | 2c 62 25 29 3a e7 61 25 |.max0(a%|,b%):.a%|
|000011d0| 3e 62 25 8c 3d 61 25 8b | 3d 62 25 0d 07 44 05 3a |>b%.=a%.|=b%..D.:|
|000011e0| 0d 07 4e 0f dd 20 f2 6f | 70 65 6e 28 62 25 29 0d |..N.. .o|pen(b%).|
|000011f0| 07 58 1a ea 20 77 69 6e | 64 25 2c 70 25 2c 6d 25 |.X.. win|d%,p%,m%|
|00001200| 2c 77 25 2c 68 25 2c 66 | 25 0d 07 62 12 70 25 3d |,w%,h%,f|%..b.p%=|
|00001210| 74 65 6d 70 25 3a 6d 25 | 3d 62 25 0d 07 6c 0e 77 |temp%:m%|=b%..l.w|
|00001220| 69 6e 64 25 3d 62 25 21 | 30 0d 07 76 0e c8 8e 20 |ind%=b%!|0..v... |
|00001230| 77 69 6e 64 25 20 ca 0d | 07 80 0c c9 20 6d 61 69 |wind% ..|.... mai|
|00001240| 6e 25 3a 0d 07 8a 28 66 | 25 3d 6d 25 21 32 38 3a |n%:...(f|%=m%!28:|
|00001250| 6d 25 21 32 38 3d 70 61 | 6e 65 25 3a c8 99 20 57 |m%!28=pa|ne%:.. W|
|00001260| 5f 4f 70 65 6e 57 25 2c | 2c 6d 25 0d 07 94 21 21 |_OpenW%,|,m%...!!|
|00001270| 70 25 3d 70 61 6e 65 25 | 3a c8 99 20 57 5f 47 65 |p%=pane%|:.. W_Ge|
|00001280| 74 57 53 74 61 74 65 25 | 2c 2c 70 25 0d 07 9e 36 |tWState%|,,p%...6|
|00001290| 77 25 3d 70 25 21 31 32 | 2d 70 25 21 34 3a 68 25 |w%=p%!12|-p%!4:h%|
|000012a0| 3d 70 25 21 31 36 2d 70 | 25 21 38 3a e7 20 66 25 |=p%!16-p|%!8:. f%|
|000012b0| 3c 3e 6d 61 69 6e 25 20 | 8c 20 70 25 21 32 38 3d |<>main% |. p%!28=|
|000012c0| 66 25 0d 07 a8 29 70 25 | 21 34 3d a4 6d 61 78 30 |f%...)p%|!4=.max0|
|000012d0| 28 30 2c 6d 25 21 34 2d | 77 25 2d 28 31 3c 3c 58 |(0,m%!4-|w%-(1<<X|
|000012e0| 45 69 67 46 61 63 74 6f | 72 29 29 0d 07 b2 27 70 |EigFacto|r))...'p|
|000012f0| 25 21 31 32 3d 70 25 21 | 34 2b 77 25 3a 70 25 21 |%!12=p%!|4+w%:p%!|
|00001300| 31 36 3d 6d 25 21 31 36 | 3a 70 25 21 38 3d 6d 25 |16=m%!16|:p%!8=m%|
|00001310| 21 38 0d 07 bc 13 c8 99 | 20 57 5f 4f 70 65 6e 57 |!8......| W_OpenW|
|00001320| 25 2c 2c 70 25 0d 07 c6 | 2d c9 20 69 6e 66 6f 25 |%,,p%...|-. info%|
|00001330| 2c 63 6f 6e 73 74 61 6e | 74 73 25 2c 66 69 6c 65 |,constan|ts%,file|
|00001340| 25 3a 20 c8 99 20 57 5f | 4f 70 65 6e 57 25 2c 2c |%: .. W_|OpenW%,,|
|00001350| 62 25 0d 07 d0 05 cb 0d | 07 da 05 e1 0d 07 e4 05 |b%......|........|
|00001360| 3a 0d 07 ee 16 dd 20 f2 | 6f 70 65 6e 77 69 6e 64 |:..... .|openwind|
|00001370| 28 77 69 6e 64 25 29 0d | 07 f8 3a 74 65 6d 70 25 |(wind%).|..:temp%|
|00001380| 21 30 3d 77 69 6e 64 25 | 3a c8 99 20 57 5f 47 65 |!0=wind%|:.. W_Ge|
|00001390| 74 57 49 6e 66 6f 25 2c | 2c 74 65 6d 70 25 3a c8 |tWInfo%,|,temp%:.|
|000013a0| 99 20 57 5f 4f 70 65 6e | 57 25 2c 2c 74 65 6d 70 |. W_Open|W%,,temp|
|000013b0| 25 0d 08 02 05 e1 0d 08 | 0c 05 3a 0d 08 16 18 dd |%.......|..:.....|
|000013c0| 20 f2 63 6c 6f 73 65 28 | 62 25 29 3a ea 20 77 69 | .close(|b%):. wi|
|000013d0| 6e 64 25 0d 08 20 1f 77 | 69 6e 64 25 3d 62 25 21 |nd%.. .w|ind%=b%!|
|000013e0| 30 3a c8 99 20 57 5f 43 | 6c 6f 73 65 57 25 2c 2c |0:.. W_C|loseW%,,|
|000013f0| 62 25 0d 08 2a 2d e7 20 | 77 69 6e 64 25 3d 6d 61 |b%..*-. |wind%=ma|
|00001400| 69 6e 25 20 8c 20 f2 63 | 6c 6f 73 65 77 69 6e 64 |in% . .c|losewind|
|00001410| 28 70 61 6e 65 25 29 3a | 6f 70 65 6e 25 3d a3 0d |(pane%):|open%=..|
|00001420| 08 34 05 e1 0d 08 3e 05 | 3a 0d 08 48 17 dd 20 f2 |.4....>.|:..H.. .|
|00001430| 63 6c 6f 73 65 77 69 6e | 64 28 77 69 6e 64 25 29 |closewin|d(wind%)|
|00001440| 0d 08 52 25 74 65 6d 70 | 25 21 30 3d 77 69 6e 64 |..R%temp|%!0=wind|
|00001450| 25 3a c8 99 20 57 5f 43 | 6c 6f 73 65 57 25 2c 2c |%:.. W_C|loseW%,,|
|00001460| 74 65 6d 70 25 0d 08 5c | 05 e1 0d 08 66 05 3a 0d |temp%..\|....f.:.|
|00001470| 08 70 19 dd 20 f2 75 70 | 64 61 74 65 5f 77 69 6e |.p.. .up|date_win|
|00001480| 64 28 77 69 6e 64 25 29 | 0d 08 7a 13 ea 20 6d 6f |d(wind%)|..z.. mo|
|00001490| 72 65 25 2c 78 30 25 2c | 79 30 25 0d 08 84 27 74 |re%,x0%,|y0%...'t|
|000014a0| 65 6d 70 25 21 30 3d 77 | 69 6e 64 25 3a c8 99 20 |emp%!0=w|ind%:.. |
|000014b0| 57 5f 47 65 74 57 49 6e | 66 6f 25 2c 2c 74 65 6d |W_GetWIn|fo%,,tem|
|000014c0| 70 25 0d 08 8e 25 74 65 | 6d 70 25 21 34 3d 74 65 |p%...%te|mp%!4=te|
|000014d0| 6d 70 25 21 34 34 3a 74 | 65 6d 70 25 21 38 3d 74 |mp%!44:t|emp%!8=t|
|000014e0| 65 6d 70 25 21 34 38 0d | 08 98 27 74 65 6d 70 25 |emp%!48.|..'temp%|
|000014f0| 21 31 32 3d 74 65 6d 70 | 25 21 35 32 3a 74 65 6d |!12=temp|%!52:tem|
|00001500| 70 25 21 31 36 3d 74 65 | 6d 70 25 21 35 36 0d 08 |p%!16=te|mp%!56..|
|00001510| a2 29 c8 99 20 22 57 69 | 6d 70 5f 55 70 64 61 74 |.).. "Wi|mp_Updat|
|00001520| 65 57 69 6e 64 6f 77 22 | 2c 2c 74 65 6d 70 25 20 |eWindow"|,,temp% |
|00001530| b8 20 6d 6f 72 65 25 0d | 08 ac 0c c8 95 20 6d 6f |. more%.|..... mo|
|00001540| 72 65 25 0d 08 b6 18 78 | 30 25 3d 74 65 6d 70 25 |re%....x|0%=temp%|
|00001550| 21 34 2d 74 65 6d 70 25 | 21 32 30 0d 08 c0 19 79 |!4-temp%|!20....y|
|00001560| 30 25 3d 74 65 6d 70 25 | 21 31 36 2d 74 65 6d 70 |0%=temp%|!16-temp|
|00001570| 25 21 32 34 0d 08 ca 14 | f2 64 72 61 77 33 64 28 |%!24....|.draw3d(|
|00001580| 78 30 25 2c 79 30 25 29 | 0d 08 d4 29 c8 99 20 22 |x0%,y0%)|...).. "|
|00001590| 57 69 6d 70 5f 47 65 74 | 52 65 63 74 61 6e 67 6c |Wimp_Get|Rectangl|
|000015a0| 65 22 2c 2c 74 65 6d 70 | 25 20 b8 20 6d 6f 72 65 |e",,temp|% . more|
|000015b0| 25 0d 08 de 05 ce 0d 08 | e8 05 e1 0d 08 f2 05 3a |%.......|.......:|
|000015c0| 0d 08 fc 37 dd 20 a4 69 | 63 6f 6e 28 77 69 6e 64 |...7. .i|con(wind|
|000015d0| 6f 77 25 2c 78 31 25 2c | 79 31 25 2c 78 32 25 2c |ow%,x1%,|y1%,x2%,|
|000015e0| 79 32 25 2c 66 6c 61 67 | 73 25 2c 69 31 25 2c 69 |y2%,flag|s%,i1%,i|
|000015f0| 32 25 2c 69 33 25 29 0d | 09 06 0d ea 20 68 61 6e |2%,i3%).|.... han|
|00001600| 64 6c 65 25 0d 09 10 20 | 21 62 6c 6f 63 6b 25 3d |dle%... |!block%=|
|00001610| 77 69 6e 64 6f 77 25 3a | 62 6c 6f 63 6b 25 21 34 |window%:|block%!4|
|00001620| 3d 78 31 25 0d 09 1a 1e | 62 6c 6f 63 6b 25 21 38 |=x1%....|block%!8|
|00001630| 3d 79 31 25 3a 62 6c 6f | 63 6b 25 21 31 32 3d 78 |=y1%:blo|ck%!12=x|
|00001640| 32 25 0d 09 24 22 62 6c | 6f 63 6b 25 21 31 36 3d |2%..$"bl|ock%!16=|
|00001650| 79 32 25 3a 62 6c 6f 63 | 6b 25 21 32 30 3d 66 6c |y2%:bloc|k%!20=fl|
|00001660| 61 67 73 25 0d 09 2e 1f | 62 6c 6f 63 6b 25 21 32 |ags%....|block%!2|
|00001670| 34 3d 69 31 25 3a 62 6c | 6f 63 6b 25 21 32 38 3d |4=i1%:bl|ock%!28=|
|00001680| 69 32 25 0d 09 38 11 62 | 6c 6f 63 6b 25 21 33 32 |i2%..8.b|lock%!32|
|00001690| 3d 69 33 25 0d 09 42 23 | c8 99 20 57 5f 43 72 65 |=i3%..B#|.. W_Cre|
|000016a0| 61 74 65 49 25 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ateI%,,b|lock% . |
|000016b0| 68 61 6e 64 6c 65 25 0d | 09 4c 0c 3d 68 61 6e 64 |handle%.|.L.=hand|
|000016c0| 6c 65 25 0d 09 56 05 3a | 0d 09 60 16 dd 20 a4 67 |le%..V.:|..`.. .g|
|000016d0| 65 74 69 63 6f 6e 6e 61 | 6d 65 28 62 25 29 0d 09 |eticonna|me(b%)..|
|000016e0| 6a 0b ea 20 41 25 2c 41 | 24 0d 09 74 09 41 25 3d |j.. A%,A|$..t.A%=|
|000016f0| 2d 31 0d 09 7e 05 f5 0d | 09 88 09 41 25 2b 3d 31 |-1..~...|...A%+=1|
|00001700| 0d 09 92 10 41 24 2b 3d | bd 28 62 25 3f 41 25 29 |....A$+=|.(b%?A%)|
|00001710| 0d 09 9c 0e fd 20 62 25 | 3f 41 25 3d 31 33 0d 09 |..... b%|?A%=13..|
|00001720| a6 09 3d c0 41 24 29 0d | 09 b0 05 3a 0d 09 ba 11 |..=.A$).|...:....|
|00001730| dd 20 f2 72 65 64 72 61 | 77 28 62 25 29 0d 09 c4 |. .redra|w(b%)...|
|00001740| 11 ea 20 77 69 6e 64 25 | 2c 6d 6f 72 65 25 0d 09 |.. wind%|,more%..|
|00001750| ce 26 c8 99 20 22 57 69 | 6d 70 5f 52 65 64 72 61 |.&.. "Wi|mp_Redra|
|00001760| 77 57 69 6e 64 6f 77 22 | 2c 2c 62 25 20 b8 20 6d |wWindow"|,,b% . m|
|00001770| 6f 72 65 25 0d 09 d8 0e | 77 69 6e 64 25 3d 62 25 |ore%....|wind%=b%|
|00001780| 21 30 0d 09 e2 12 78 30 | 25 3d 62 25 21 34 2d 62 |!0....x0|%=b%!4-b|
|00001790| 25 21 32 30 0d 09 ec 13 | 79 30 25 3d 62 25 21 31 |%!20....|y0%=b%!1|
|000017a0| 36 2d 62 25 21 32 34 0d | 09 f6 0c c8 95 20 6d 6f |6-b%!24.|..... mo|
|000017b0| 72 65 25 0d 0a 00 24 e7 | 20 77 69 6e 64 25 3d 6d |re%...$.| wind%=m|
|000017c0| 61 69 6e 25 20 8c 20 f2 | 64 72 61 77 33 64 28 78 |ain% . .|draw3d(x|
|000017d0| 30 25 2c 79 30 25 29 0d | 0a 0a 26 c8 99 20 22 57 |0%,y0%).|..&.. "W|
|000017e0| 69 6d 70 5f 47 65 74 52 | 65 63 74 61 6e 67 6c 65 |imp_GetR|ectangle|
|000017f0| 22 2c 2c 62 25 20 b8 20 | 6d 6f 72 65 25 0d 0a 14 |",,b% . |more%...|
|00001800| 05 ce 0d 0a 1e 05 e1 0d | 0a 28 05 3a 0d 0a 32 18 |........|.(.:..2.|
|00001810| dd 20 f2 72 65 74 69 74 | 6c 65 28 77 69 6e 64 25 |. .retit|le(wind%|
|00001820| 2c 54 24 29 0d 0a 3c 35 | 21 74 65 6d 70 25 3d 77 |,T$)..<5|!temp%=w|
|00001830| 69 6e 64 25 3a c8 99 20 | 57 5f 47 65 74 57 49 6e |ind%:.. |W_GetWIn|
|00001840| 66 6f 25 2c 2c 74 65 6d | 70 25 3a 24 28 74 65 6d |fo%,,tem|p%:$(tem|
|00001850| 70 25 21 37 36 29 3d 54 | 24 0d 0a 46 60 e7 20 28 |p%!76)=T|$..F`. (|
|00001860| 28 74 65 6d 70 25 21 33 | 32 29 20 80 20 28 31 3c |(temp%!3|2) . (1<|
|00001870| 3c 31 36 29 29 3c 3e 30 | 20 8c 20 c8 99 20 22 57 |<16))<>0| . .. "W|
|00001880| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|00001890| 2c 2d 31 2c 74 65 6d 70 | 25 21 34 2c 74 65 6d 70 |,-1,temp|%!4,temp|
|000018a0| 25 21 31 36 2c 74 65 6d | 70 25 21 31 32 2c 74 65 |%!16,tem|p%!12,te|
|000018b0| 6d 70 25 21 31 36 2b 34 | 34 0d 0a 50 05 e1 0d 0a |mp%!16+4|4..P....|
|000018c0| 5a 05 3a 0d 0a 64 16 dd | 20 f2 64 65 66 61 75 6c |Z.:..d..| .defaul|
|000018d0| 74 5f 70 6f 69 6e 74 65 | 72 0d 0a 6e 0e 2a 70 6f |t_pointe|r..n.*po|
|000018e0| 69 6e 74 65 72 20 31 0d | 0a 78 0a 6f 77 6e 25 3d |inter 1.|.x.own%=|
|000018f0| a3 0d 0a 82 05 e1 0d 0a | 8c 05 3a 0d 0a 96 11 dd |........|..:.....|
|00001900| 20 f2 6d 79 5f 70 6f 69 | 6e 74 65 72 0d 0a a0 31 | .my_poi|nter...1|
|00001910| c8 99 20 22 57 69 6d 70 | 5f 53 70 72 69 74 65 4f |.. "Wimp|_SpriteO|
|00001920| 70 22 2c 33 36 2c 31 2c | 22 70 74 72 5f 63 72 6f |p",36,1,|"ptr_cro|
|00001930| 73 73 22 2c 32 2c 38 2c | 35 2c 30 2c 30 0d 0a aa |ss",2,8,|5,0,0...|
|00001940| 0a 6f 77 6e 25 3d b9 0d | 0a b4 05 e1 0d 0a be 05 |.own%=..|........|
|00001950| 3a 0d 0a c8 12 dd 20 f2 | 62 75 74 74 6f 6e 73 28 |:..... .|buttons(|
|00001960| 62 25 29 0d 0a d2 13 ea | 20 78 25 2c 79 25 2c 62 |b%).....| x%,y%,b|
|00001970| 75 74 74 6f 6e 25 0d 0a | dc 20 78 25 3d 62 25 21 |utton%..|. x%=b%!|
|00001980| 30 3a 79 25 3d 62 25 21 | 34 3a 62 75 74 74 6f 6e |0:y%=b%!|4:button|
|00001990| 25 3d 62 25 21 38 0d 0a | e6 1b 77 69 6e 64 25 3d |%=b%!8..|..wind%=|
|000019a0| 62 25 21 31 32 3a 69 63 | 6f 6e 25 3d 62 25 21 31 |b%!12:ic|on%=b%!1|
|000019b0| 36 0d 0a f0 0e c8 8e 20 | 77 69 6e 64 25 20 ca 0d |6...... |wind% ..|
|000019c0| 0a fa 0c c9 20 6d 61 69 | 6e 25 3a 0d 0b 04 3e 20 |.... mai|n%:...> |
|000019d0| e7 20 62 75 74 74 6f 6e | 25 3c 3e 32 20 8c 20 53 |. button|%<>2 . S|
|000019e0| 65 6c 65 63 74 65 64 25 | 3d a4 65 64 69 74 28 78 |elected%|=.edit(x|
|000019f0| 25 2c 79 25 2c 62 75 74 | 74 6f 6e 25 29 20 8b 20 |%,y%,but|ton%) . |
|00001a00| f2 6d 65 6e 75 28 62 25 | 29 0d 0b 0e 09 c9 20 2d |.menu(b%|)..... -|
|00001a10| 32 3a 0d 0b 18 2b 20 e7 | 20 62 75 74 74 6f 6e 25 |2:...+ .| button%|
|00001a20| 3d 32 20 80 20 69 63 6f | 6e 25 3d 73 69 63 6f 6e |=2 . ico|n%=sicon|
|00001a30| 25 20 8c 20 f2 6d 65 6e | 75 28 62 25 29 0d 0b 22 |% . .men|u(b%).."|
|00001a40| 2b 20 e7 20 62 75 74 74 | 6f 6e 25 3d 34 20 80 20 |+ . butt|on%=4 . |
|00001a50| 69 63 6f 6e 25 3d 73 69 | 63 6f 6e 25 20 80 20 ac |icon%=si|con% . .|
|00001a60| 20 6f 70 65 6e 25 20 8c | 0d 0b 2c 15 20 f2 6f 70 | open% .|..,. .op|
|00001a70| 65 6e 77 69 6e 64 28 6d | 61 69 6e 25 29 0d 0b 36 |enwind(m|ain%)..6|
|00001a80| 15 20 f2 6f 70 65 6e 77 | 69 6e 64 28 70 61 6e 65 |. .openw|ind(pane|
|00001a90| 25 29 0d 0b 40 0c 20 6f | 70 65 6e 25 3d b9 0d 0b |%)..@. o|pen%=...|
|00001aa0| 4a 06 20 cd 0d 0b 54 0c | c9 20 70 61 6e 65 25 3a |J. ...T.|. pane%:|
|00001ab0| 0d 0b 5e 11 20 c8 8e 20 | 62 75 74 74 6f 6e 25 20 |..^. .. |button% |
|00001ac0| ca 0d 0b 68 2a 20 c9 20 | 31 20 3a 64 25 3d 2d 31 |...h* . |1 :d%=-1|
|00001ad0| 3a f4 20 53 65 6c 65 63 | 74 20 72 6f 74 61 74 65 |:. Selec|t rotate|
|00001ae0| 73 20 63 6c 6f 63 6b 77 | 69 73 65 0d 0b 72 2e 20 |s clockw|ise..r. |
|00001af0| c9 20 34 20 3a 64 25 3d | 30 20 3a f4 20 41 64 6a |. 4 :d%=|0 :. Adj|
|00001b00| 75 73 74 20 72 6f 74 61 | 74 65 73 20 61 6e 74 69 |ust rota|tes anti|
|00001b10| 63 6c 6f 63 6b 77 69 73 | 65 0d 0b 7c 06 20 cb 0d |clockwis|e..|. ..|
|00001b20| 0b 86 16 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |... .. "|Hourglas|
|00001b30| 73 5f 4f 6e 22 0d 0b 90 | 0f 20 c8 8e 20 69 63 6f |s_On"...|. .. ico|
|00001b40| 6e 25 20 ca 0d 0b 9a 2f | 20 c9 20 30 20 3a f2 6d |n% ..../| . 0 :.m|
|00001b50| 6f 76 65 5f 74 6f 5f 6f | 72 69 67 69 6e 28 53 65 |ove_to_o|rigin(Se|
|00001b60| 6c 65 63 74 65 64 25 29 | 3a 64 72 69 76 65 72 32 |lected%)|:driver2|
|00001b70| 25 3d a3 0d 0b a4 26 20 | c9 20 31 20 3a f2 72 6f |%=....& |. 1 :.ro|
|00001b80| 74 61 74 65 5f 58 61 78 | 69 73 28 64 25 29 3a 64 |tate_Xax|is(d%):d|
|00001b90| 72 69 76 65 72 32 25 3d | a3 0d 0b ae 26 20 c9 20 |river2%=|....& . |
|00001ba0| 32 20 3a f2 72 6f 74 61 | 74 65 5f 59 61 78 69 73 |2 :.rota|te_Yaxis|
|00001bb0| 28 64 25 29 3a 64 72 69 | 76 65 72 32 25 3d a3 0d |(d%):dri|ver2%=..|
|00001bc0| 0b b8 26 20 c9 20 33 20 | 3a f2 72 6f 74 61 74 65 |..& . 3 |:.rotate|
|00001bd0| 5f 5a 61 78 69 73 28 64 | 25 29 3a 64 72 69 76 65 |_Zaxis(d|%):drive|
|00001be0| 72 32 25 3d a3 0d 0b c2 | 15 20 c9 20 34 20 3a e7 |r2%=....|. . 4 :.|
|00001bf0| 20 64 72 69 76 65 72 25 | 20 8c 0d 0b cc 34 20 20 | driver%| ....4 |
|00001c00| 20 20 20 20 20 20 20 20 | 20 20 e7 20 ac 20 64 72 | | . . dr|
|00001c10| 69 76 65 72 32 25 20 8c | 20 f2 64 72 69 76 65 72 |iver2% .| .driver|
|00001c20| 5f 61 78 69 73 28 44 53 | 25 2c 44 45 25 29 0d 0b |_axis(DS|%,DE%)..|
|00001c30| d6 18 20 20 20 20 20 20 | 20 20 20 f2 64 72 69 76 |.. | .driv|
|00001c40| 65 72 28 64 25 29 0d 0b | e0 0e 20 20 20 20 20 20 |er(d%)..|.. |
|00001c50| 20 20 20 cd 0d 0b ea 20 | 20 c9 20 35 20 3a f2 73 | .... | . 5 :.s|
|00001c60| 68 72 69 6e 6b 28 64 25 | 29 3a 64 72 69 76 65 72 |hrink(d%|):driver|
|00001c70| 32 25 3d a3 0d 0b f4 21 | 20 c9 20 36 20 3a f2 65 |2%=....!| . 6 :.e|
|00001c80| 6e 6c 61 72 67 65 28 64 | 25 29 3a 64 72 69 76 65 |nlarge(d|%):drive|
|00001c90| 72 32 25 3d a3 0d 0b fe | 1f 20 c9 20 37 3a 20 f2 |r2%=....|. . 7: .|
|00001ca0| 6f 70 65 6e 77 69 6e 64 | 28 63 6f 6e 73 74 61 6e |openwind|(constan|
|00001cb0| 74 73 25 29 0d 0c 08 06 | 20 cb 0d 0c 12 0c 20 f2 |ts%)....| ..... .|
|00001cc0| 72 65 63 61 6c 63 0d 0c | 1c 18 20 f2 75 70 64 61 |recalc..|.. .upda|
|00001cd0| 74 65 5f 77 69 6e 64 28 | 6d 61 69 6e 25 29 0d 0c |te_wind(|main%)..|
|00001ce0| 26 17 20 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |&. .. "H|ourglass|
|00001cf0| 5f 4f 66 66 22 0d 0c 30 | 05 cb 0d 0c 3a 05 e1 0d |_Off"..0|....:...|
|00001d00| 0c 44 05 3a 0d 0c 4e 11 | dd 20 f2 75 70 64 61 74 |.D.:..N.|. .updat|
|00001d10| 65 6d 61 69 6e 0d 0c 58 | 0f 53 65 6c 65 63 74 65 |emain..X|.Selecte|
|00001d20| 64 25 3d 30 0d 0c 62 11 | 6c 61 73 74 73 65 6c 65 |d%=0..b.|lastsele|
|00001d30| 63 74 25 3d 30 0d 0c 6c | 0f 53 65 6c 65 63 74 25 |ct%=0..l|.Select%|
|00001d40| 28 29 3d 30 0d 0c 76 14 | f2 63 72 65 61 74 65 5f |()=0..v.|.create_|
|00001d50| 62 6f 6e 64 6c 69 73 74 | 0d 0c 80 0b f2 72 65 63 |bondlist|.....rec|
|00001d60| 61 6c 63 0d 0c 8a 17 f2 | 75 70 64 61 74 65 5f 77 |alc.....|update_w|
|00001d70| 69 6e 64 28 6d 61 69 6e | 25 29 0d 0c 94 05 e1 0d |ind(main|%)......|
|00001d80| 0c 9e 05 3a 0d 0c a8 0e | dd 20 f2 6b 65 79 28 62 |...:....|. .key(b|
|00001d90| 25 29 0d 0c b2 11 ea 20 | 77 69 6e 64 25 2c 69 63 |%)..... |wind%,ic|
|00001da0| 6f 6e 25 0d 0c bc 0e 77 | 69 6e 64 25 3d 62 25 21 |on%....w|ind%=b%!|
|00001db0| 30 0d 0c c6 0e 69 63 6f | 6e 25 3d 62 25 21 34 0d |0....ico|n%=b%!4.|
|00001dc0| 0c d0 0f 63 68 61 72 25 | 3d 62 25 21 32 34 0d 0c |...char%|=b%!24..|
|00001dd0| da 0e c8 8e 20 63 68 61 | 72 25 20 ca 0d 0c e4 1f |.... cha|r% .....|
|00001de0| c9 20 26 31 38 46 3a f2 | 6d 6f 76 65 75 70 28 77 |. &18F:.|moveup(w|
|00001df0| 69 6e 64 25 2c 69 63 6f | 6e 25 29 0d 0c ee 21 c9 |ind%,ico|n%)...!.|
|00001e00| 20 26 31 38 45 3a f2 6d | 6f 76 65 64 6f 77 6e 28 | &18E:.m|ovedown(|
|00001e10| 77 69 6e 64 25 2c 69 63 | 6f 6e 25 29 0d 0c f8 34 |wind%,ic|on%)...4|
|00001e20| c9 20 31 33 3a f2 61 63 | 63 65 70 74 28 77 69 6e |. 13:.ac|cept(win|
|00001e30| 64 25 2c 69 63 6f 6e 25 | 29 3a f2 6d 6f 76 65 64 |d%,icon%|):.moved|
|00001e40| 6f 77 6e 28 77 69 6e 64 | 25 2c 69 63 6f 6e 25 29 |own(wind|%,icon%)|
|00001e50| 0d 0d 02 05 7f 0d 0d 0c | 1a c8 99 20 57 5f 50 72 |........|... W_Pr|
|00001e60| 6f 63 65 73 73 4b 65 79 | 25 2c 63 68 61 72 25 0d |ocessKey|%,char%.|
|00001e70| 0d 16 05 cb 0d 0d 20 1d | f2 72 65 74 69 74 6c 65 |...... .|.retitle|
|00001e80| 28 6d 61 69 6e 25 2c 4d | 6f 6c 65 63 75 6c 65 24 |(main%,M|olecule$|
|00001e90| 29 0d 0d 2a 05 e1 0d 0d | 34 05 3a 0d 0d 3e 1a dd |)..*....|4.:..>..|
|00001ea0| 20 f2 6d 6f 76 65 75 70 | 28 77 69 6e 64 25 2c 69 | .moveup|(wind%,i|
|00001eb0| 63 6f 6e 25 29 0d 0d 48 | 08 ea 20 41 25 0d 0d 52 |con%)..H|.. A%..R|
|00001ec0| 0c 69 63 6f 6e 25 2d 3d | 31 0d 0d 5c 0e c8 8e 20 |.icon%-=|1..\... |
|00001ed0| 77 69 6e 64 25 20 ca 0d | 0d 66 10 c9 20 63 6f 6e |wind% ..|.f.. con|
|00001ee0| 73 74 61 6e 74 73 25 0d | 0d 70 17 e7 20 69 63 6f |stants%.|.p.. ico|
|00001ef0| 6e 25 3d 32 20 8c 20 69 | 63 6f 6e 25 3d 35 0d 0d |n%=2 . i|con%=5..|
|00001f00| 7a 05 cb 0d 0d 84 26 c8 | 99 20 22 57 69 6d 70 5f |z.....&.|. "Wimp_|
|00001f10| 47 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |GetCaret|Position|
|00001f20| 22 2c 2c 63 61 72 65 74 | 25 0d 0d 8e 14 69 63 6f |",,caret|%....ico|
|00001f30| 6e 62 6c 6b 25 21 30 3d | 77 69 6e 64 25 0d 0d 98 |nblk%!0=|wind%...|
|00001f40| 14 69 63 6f 6e 62 6c 6b | 25 21 34 3d 69 63 6f 6e |.iconblk|%!4=icon|
|00001f50| 25 0d 0d a2 1d c8 99 20 | 57 5f 47 65 74 49 53 74 |%...... |W_GetISt|
|00001f60| 61 74 65 25 2c 2c 69 63 | 6f 6e 62 6c 6b 25 0d 0d |ate%,,ic|onblk%..|
|00001f70| ac 35 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 43 61 |.5.. "Wi|mp_SetCa|
|00001f80| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 63 61 72 |retPosit|ion",car|
|00001f90| 65 74 25 21 30 2c 69 63 | 6f 6e 25 2c 2c 2c 2d 31 |et%!0,ic|on%,,,-1|
|00001fa0| 2c 2d 31 0d 0d b6 05 e1 | 0d 0d c0 05 3a 0d 0d ca |,-1.....|....:...|
|00001fb0| 1c dd 20 f2 6d 6f 76 65 | 64 6f 77 6e 28 77 69 6e |.. .move|down(win|
|00001fc0| 64 25 2c 69 63 6f 6e 25 | 29 0d 0d d4 0c 69 63 6f |d%,icon%|)....ico|
|00001fd0| 6e 25 2b 3d 31 0d 0d de | 0e c8 8e 20 77 69 6e 64 |n%+=1...|... wind|
|00001fe0| 25 20 ca 0d 0d e8 10 c9 | 20 63 6f 6e 73 74 61 6e |% ......| constan|
|00001ff0| 74 73 25 0d 0d f2 17 e7 | 20 69 63 6f 6e 25 3d 36 |ts%.....| icon%=6|
|00002000| 20 8c 20 69 63 6f 6e 25 | 3d 33 0d 0d fc 05 cb 0d | . icon%|=3......|
|00002010| 0e 06 26 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 43 |..&.. "W|imp_GetC|
|00002020| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 2c 63 |aretPosi|tion",,c|
|00002030| 61 72 65 74 25 0d 0e 10 | 14 69 63 6f 6e 62 6c 6b |aret%...|.iconblk|
|00002040| 25 21 30 3d 77 69 6e 64 | 25 0d 0e 1a 14 69 63 6f |%!0=wind|%....ico|
|00002050| 6e 62 6c 6b 25 21 34 3d | 69 63 6f 6e 25 0d 0e 24 |nblk%!4=|icon%..$|
|00002060| 1d c8 99 20 57 5f 47 65 | 74 49 53 74 61 74 65 25 |... W_Ge|tIState%|
|00002070| 2c 2c 69 63 6f 6e 62 6c | 6b 25 0d 0e 2e 35 c8 99 |,,iconbl|k%...5..|
|00002080| 20 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 | "Wimp_S|etCaretP|
|00002090| 6f 73 69 74 69 6f 6e 22 | 2c 63 61 72 65 74 25 21 |osition"|,caret%!|
|000020a0| 30 2c 69 63 6f 6e 25 2c | 2c 2c 2d 31 2c 2d 31 0d |0,icon%,|,,-1,-1.|
|000020b0| 0e 38 05 e1 0d 0e 42 05 | 3a 0d 0e 4c 1a dd 20 f2 |.8....B.|:..L.. .|
|000020c0| 61 63 63 65 70 74 28 77 | 69 6e 64 25 2c 69 63 6f |accept(w|ind%,ico|
|000020d0| 6e 25 29 0d 0e 56 08 ea | 20 41 25 0d 0e 60 0e c8 |n%)..V..| A%..`..|
|000020e0| 8e 20 77 69 6e 64 25 20 | ca 0d 0e 6a 1f c9 20 63 |. wind% |...j.. c|
|000020f0| 6f 6e 73 74 61 6e 74 73 | 25 20 3a f2 67 65 74 63 |onstants|% :.getc|
|00002100| 6f 6e 73 74 76 61 72 73 | 0d 0e 74 05 cb 0d 0e 7e |onstvars|..t....~|
|00002110| 05 e1 0d 0e 88 05 3a 0d | 0e 92 13 dd 20 f2 67 65 |......:.|.... .ge|
|00002120| 74 63 6f 6e 73 74 76 61 | 72 73 0d 0e 9c 26 41 6e |tconstva|rs...&An|
|00002130| 67 6c 65 3d a4 67 65 74 | 76 61 72 76 61 6c 28 33 |gle=.get|varval(3|
|00002140| 29 3a f2 69 6e 69 74 33 | 64 28 41 6e 67 6c 65 29 |):.init3|d(Angle)|
|00002150| 0d 0e a6 17 53 63 61 6c | 65 3d a4 67 65 74 76 61 |....Scal|e=.getva|
|00002160| 72 76 61 6c 28 34 29 0d | 0e b0 1e 4d 6f 6c 65 63 |rval(4).|...Molec|
|00002170| 75 6c 65 24 3d a4 67 65 | 74 73 74 72 76 61 72 76 |ule$=.ge|tstrvarv|
|00002180| 61 6c 28 35 29 0d 0e ba | 0b f2 72 65 63 61 6c 63 |al(5)...|..recalc|
|00002190| 0d 0e c4 17 f2 75 70 64 | 61 74 65 5f 77 69 6e 64 |.....upd|ate_wind|
|000021a0| 28 6d 61 69 6e 25 29 0d | 0e ce 05 e1 0d 0e d8 05 |(main%).|........|
|000021b0| 3a 0d 0e e2 17 dd 20 a4 | 67 65 74 76 61 72 76 61 |:..... .|getvarva|
|000021c0| 6c 28 69 63 6f 6e 25 29 | 0d 0e ec 3f 69 63 6f 6e |l(icon%)|...?icon|
|000021d0| 62 6c 6b 25 21 30 3d 77 | 69 6e 64 25 3a 69 63 6f |blk%!0=w|ind%:ico|
|000021e0| 6e 62 6c 6b 25 21 34 3d | 69 63 6f 6e 25 3a c8 99 |nblk%!4=|icon%:..|
|000021f0| 20 57 5f 47 65 74 49 53 | 74 61 74 65 25 2c 2c 69 | W_GetIS|tate%,,i|
|00002200| 63 6f 6e 62 6c 6b 25 0d | 0e f6 27 72 65 73 75 6c |conblk%.|..'resul|
|00002210| 74 24 3d 24 28 69 63 6f | 6e 62 6c 6b 25 21 32 38 |t$=$(ico|nblk%!28|
|00002220| 29 3a 20 3d bb 28 72 65 | 73 75 6c 74 24 29 0d 0f |): =.(re|sult$)..|
|00002230| 00 05 3a 0d 0f 0a 1a dd | 20 a4 67 65 74 73 74 72 |..:.....| .getstr|
|00002240| 76 61 72 76 61 6c 28 69 | 63 6f 6e 25 29 0d 0f 14 |varval(i|con%)...|
|00002250| 3f 69 63 6f 6e 62 6c 6b | 25 21 30 3d 77 69 6e 64 |?iconblk|%!0=wind|
|00002260| 25 3a 69 63 6f 6e 62 6c | 6b 25 21 34 3d 69 63 6f |%:iconbl|k%!4=ico|
|00002270| 6e 25 3a c8 99 20 57 5f | 47 65 74 49 53 74 61 74 |n%:.. W_|GetIStat|
|00002280| 65 25 2c 2c 69 63 6f 6e | 62 6c 6b 25 0d 0f 1e 13 |e%,,icon|blk%....|
|00002290| 3d 24 28 69 63 6f 6e 62 | 6c 6b 25 21 32 38 29 0d |=$(iconb|lk%!28).|
|000022a0| 0f 28 05 3a 0d 0f 32 1d | dd 20 f2 73 65 74 76 61 |.(.:..2.|. .setva|
|000022b0| 72 69 63 6f 6e 28 69 63 | 6f 6e 25 2c 76 61 6c 24 |ricon(ic|on%,val$|
|000022c0| 29 0d 0f 3c 3f 69 63 6f | 6e 62 6c 6b 25 21 30 3d |)..<?ico|nblk%!0=|
|000022d0| 77 69 6e 64 25 3a 69 63 | 6f 6e 62 6c 6b 25 21 34 |wind%:ic|onblk%!4|
|000022e0| 3d 69 63 6f 6e 25 3a c8 | 99 20 57 5f 47 65 74 49 |=icon%:.|. W_GetI|
|000022f0| 53 74 61 74 65 25 2c 2c | 69 63 6f 6e 62 6c 6b 25 |State%,,|iconblk%|
|00002300| 0d 0f 46 17 24 28 69 63 | 6f 6e 62 6c 6b 25 21 32 |..F.$(ic|onblk%!2|
|00002310| 38 29 3d 76 61 6c 24 0d | 0f 50 38 69 63 6f 6e 62 |8)=val$.|.P8iconb|
|00002320| 6c 6b 25 21 38 3d 30 3a | 69 63 6f 6e 62 6c 6b 25 |lk%!8=0:|iconblk%|
|00002330| 21 31 32 3d 30 3a c8 99 | 20 57 5f 53 65 74 49 53 |!12=0:..| W_SetIS|
|00002340| 74 61 74 65 25 2c 2c 69 | 63 6f 6e 62 6c 6b 25 0d |tate%,,i|conblk%.|
|00002350| 0f 5a 05 e1 0d 0f 64 05 | 3a 0d 0f 6e 0f dd 20 f2 |.Z....d.|:..n.. .|
|00002360| 6d 65 6e 75 28 62 25 29 | 0d 0f 78 10 6d 65 6e 75 |menu(b%)|..x.menu|
|00002370| 5f 78 25 3d 62 25 21 30 | 0d 0f 82 10 6d 65 6e 75 |_x%=b%!0|....menu|
|00002380| 5f 79 25 3d 62 25 21 34 | 0d 0f 8c 10 6d 65 6e 75 |_y%=b%!4|....menu|
|00002390| 5f 62 25 3d 62 25 21 38 | 0d 0f 96 11 6d 65 6e 75 |_b%=b%!8|....menu|
|000023a0| 5f 77 25 3d 62 25 21 31 | 32 0d 0f a0 11 6d 65 6e |_w%=b%!1|2....men|
|000023b0| 75 5f 69 25 3d 62 25 21 | 31 36 0d 0f aa 15 24 6d |u_i%=b%!|16....$m|
|000023c0| 65 6e 75 25 3d c4 32 35 | 35 2c bd 28 30 29 29 0d |enu%=.25|5,.(0)).|
|000023d0| 0f b4 1c 24 28 6d 65 6e | 75 25 2b 26 31 30 30 29 |...$(men|u%+&100)|
|000023e0| 3d c4 32 35 35 2c bd 28 | 30 29 29 0d 0f be 0e c8 |=.255,.(|0)).....|
|000023f0| 8e 20 62 25 21 31 32 20 | ca 0d 0f c8 21 c9 20 2d |. b%!12 |....!. -|
|00002400| 32 3a f2 64 72 61 77 6d | 65 6e 75 28 31 2c 6d 65 |2:.drawm|enu(1,me|
|00002410| 6e 75 25 2c 30 2c 31 32 | 30 29 0d 0f d2 29 c8 99 |nu%,0,12|0)...)..|
|00002420| 20 57 5f 43 72 65 61 74 | 65 4d 25 2c 2c 6d 65 6e | W_Creat|eM%,,men|
|00002430| 75 25 2b 34 2c 6d 65 6e | 75 5f 78 25 2d 36 34 2c |u%+4,men|u_x%-64,|
|00002440| 31 36 30 0d 0f dc 0b c9 | 20 6d 61 69 6e 25 0d 0f |160.....| main%..|
|00002450| e6 1c 24 28 6d 65 6e 75 | 25 2b 26 31 30 30 29 3d |..$(menu|%+&100)=|
|00002460| c4 32 35 35 2c bd 28 30 | 29 29 0d 0f f0 1c f2 64 |.255,.(0|)).....d|
|00002470| 72 61 77 6d 65 6e 75 28 | 31 2c 6d 65 6e 75 25 2c |rawmenu(|1,menu%,|
|00002480| 30 2c 31 32 30 29 0d 0f | fa 2a c8 99 20 57 5f 43 |0,120)..|.*.. W_C|
|00002490| 72 65 61 74 65 4d 25 2c | 2c 6d 65 6e 75 25 2b 34 |reateM%,|,menu%+4|
|000024a0| 2c 6d 65 6e 75 5f 78 25 | 2c 6d 65 6e 75 5f 79 25 |,menu_x%|,menu_y%|
|000024b0| 0d 10 04 05 cb 0d 10 0e | 05 e1 0d 10 18 05 3a 0d |........|......:.|
|000024c0| 10 22 1c dd 20 f2 64 72 | 61 77 6d 65 6e 75 28 68 |.".. .dr|awmenu(h|
|000024d0| 25 2c 6d 25 2c 4d 25 2c | 77 25 29 0d 10 2c 10 ea |%,m%,M%,|w%)..,..|
|000024e0| 20 41 25 2c 6d 24 2c 70 | 74 72 25 0d 10 36 12 21 | A%,m$,p|tr%..6.!|
|000024f0| 6d 25 3d 68 25 3a 6d 25 | 3f 31 36 3d 37 0d 10 40 |m%=h%:m%|?16=7..@|
|00002500| 1b 6d 25 3f 31 37 3d 32 | 3a 6d 25 3f 31 38 3d 37 |.m%?17=2|:m%?18=7|
|00002510| 3a 6d 25 3f 31 39 3d 30 | 0d 10 4a 15 6d 25 21 32 |:m%?19=0|..J.m%!2|
|00002520| 30 3d 77 25 3a 6d 25 21 | 32 34 3d 34 30 0d 10 54 |0=w%:m%!|24=40..T|
|00002530| 16 6d 25 21 32 38 3d 30 | 3a 70 74 72 25 3d 6d 25 |.m%!28=0|:ptr%=m%|
|00002540| 2b 33 32 0d 10 5e 21 24 | 28 6d 25 2b 34 29 3d c0 |+32..^!$|(m%+4)=.|
|00002550| 4d 65 6e 75 73 24 28 4d | 25 2c 30 29 2c 31 31 29 |Menus$(M|%,0),11)|
|00002560| 2b bd 31 33 0d 10 68 17 | e3 20 41 25 3d 31 20 b8 |+.13..h.|. A%=1 .|
|00002570| 20 4d 65 6e 75 73 25 28 | 4d 25 29 0d 10 72 15 21 | Menus%(|M%)..r.!|
|00002580| 70 74 72 25 3d 30 3a 70 | 74 72 25 21 34 3d 2d 31 |ptr%=0:p|tr%!4=-1|
|00002590| 0d 10 7c 14 6d 24 3d 4d | 65 6e 75 73 24 28 4d 25 |..|.m$=M|enus$(M%|
|000025a0| 2c 41 25 29 0d 10 86 12 | e7 20 c2 6d 24 2c 31 29 |,A%)....|. .m$,1)|
|000025b0| 3d 22 5f 22 20 8c 0d 10 | 90 0c 70 74 72 25 21 30 |="_" ...|..ptr%!0|
|000025c0| 3d 32 0d 10 9a 05 cd 0d | 10 a4 0b 6d 24 3d c0 6d |=2......|...m$=.m|
|000025d0| 24 29 0d 10 ae 1f e7 20 | 6d 24 3d 22 20 49 6e 66 |$)..... |m$=" Inf|
|000025e0| 6f 22 20 8c 20 70 74 72 | 25 21 34 3d 69 6e 66 6f |o" . ptr|%!4=info|
|000025f0| 25 0d 10 b8 13 70 74 72 | 25 21 38 3d 26 37 30 30 |%....ptr|%!8=&700|
|00002600| 30 30 32 31 0d 10 c2 1a | 24 28 70 74 72 25 2b 31 |0021....|$(ptr%+1|
|00002610| 32 29 3d c0 6d 24 2c 31 | 31 29 2b bd 31 33 0d 10 |2)=.m$,1|1)+.13..|
|00002620| cc 0c 70 74 72 25 2b 3d | 32 34 0d 10 d6 08 ed 20 |..ptr%+=|24..... |
|00002630| 41 25 0d 10 e0 1b 70 74 | 72 25 21 2d 32 34 3d 70 |A%....pt|r%!-24=p|
|00002640| 74 72 25 21 2d 32 34 20 | 84 20 26 38 30 0d 10 ea |tr%!-24 |. &80...|
|00002650| 05 e1 0d 10 f4 05 3a 0d | 10 fe 15 dd 20 f2 6d 65 |......:.|.... .me|
|00002660| 6e 75 73 65 6c 65 63 74 | 28 62 25 29 0d 11 08 13 |nuselect|(b%)....|
|00002670| ea 20 4d 31 24 2c 4d 32 | 24 2c 4d 24 2c 44 25 0d |. M1$,M2|$,M$,D%.|
|00002680| 11 12 2e c8 99 20 57 5f | 50 6f 69 6e 74 65 72 49 |..... W_|PointerI|
|00002690| 6e 66 6f 25 2c 2c 74 65 | 6d 70 25 3a 73 74 61 79 |nfo%,,te|mp%:stay|
|000026a0| 25 3d 28 74 65 6d 70 25 | 21 38 3d 31 29 0d 11 1c |%=(temp%|!8=1)...|
|000026b0| 36 c8 99 20 22 57 69 6d | 70 5f 44 65 63 6f 64 65 |6.. "Wim|p_Decode|
|000026c0| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 25 2b 34 2c 62 |Menu",,m|enu%+4,b|
|000026d0| 25 2c c4 32 30 30 2c 22 | 20 22 29 20 b8 20 2c 2c |%,.200,"| ") . ,,|
|000026e0| 2c 4d 24 0d 11 26 0f 44 | 25 3d a7 4d 24 2c 22 2e |,M$..&.D|%=.M$,".|
|000026f0| 22 29 0d 11 30 0d e7 20 | 44 25 3c 3e 30 20 8c 0d |")..0.. |D%<>0 ..|
|00002700| 11 3a 1f 4d 31 24 3d c0 | 4d 24 2c 44 25 2d 31 29 |.:.M1$=.|M$,D%-1)|
|00002710| 3a 4d 32 24 3d c1 4d 24 | 2c 44 25 2b 31 29 0d 11 |:M2$=.M$|,D%+1)..|
|00002720| 44 05 cc 0d 11 4e 11 4d | 31 24 3d 4d 24 3a 4d 32 |D....N.M|1$=M$:M2|
|00002730| 24 3d 22 22 0d 11 58 05 | cd 0d 11 62 0f c8 8e 20 |$=""..X.|...b... |
|00002740| 21 6d 65 6e 75 25 20 ca | 0d 11 6c 07 c9 20 31 0d |!menu% .|..l.. 1.|
|00002750| 11 76 0d 20 c8 8e 20 4d | 31 24 20 ca 0d 11 80 1c |.v. .. M|1$ .....|
|00002760| 20 c9 20 c0 4d 65 6e 75 | 73 24 28 30 2c 32 29 29 | . .Menu|s$(0,2))|
|00002770| 3a 71 75 69 74 25 3d b9 | 0d 11 8a 06 20 cb 0d 11 |:quit%=.|.... ...|
|00002780| 94 05 cb 0d 11 9e 6c e7 | 20 73 74 61 79 25 20 8c |......l.| stay% .|
|00002790| 20 74 65 6d 70 25 21 30 | 3d 6d 65 6e 75 5f 78 25 | temp%!0|=menu_x%|
|000027a0| 3a 74 65 6d 70 25 21 34 | 3d 6d 65 6e 75 5f 79 25 |:temp%!4|=menu_y%|
|000027b0| 3a 74 65 6d 70 25 21 38 | 3d 6d 65 6e 75 5f 62 25 |:temp%!8|=menu_b%|
|000027c0| 3a 74 65 6d 70 25 21 31 | 32 3d 6d 65 6e 75 5f 77 |:temp%!1|2=menu_w|
|000027d0| 25 3a 74 65 6d 70 25 21 | 31 36 3d 6d 65 6e 75 5f |%:temp%!|16=menu_|
|000027e0| 69 25 3a f2 6d 65 6e 75 | 28 74 65 6d 70 25 29 0d |i%:.menu|(temp%).|
|000027f0| 11 a8 05 e1 0d 11 b2 05 | 3a 0d 11 bc 12 dd 20 f2 |........|:..... .|
|00002800| 72 65 63 65 69 76 65 28 | 62 25 29 0d 11 c6 0e c8 |receive(|b%).....|
|00002810| 8e 20 62 25 21 31 36 20 | ca 0d 11 d0 0f c9 20 30 |. b%!16 |...... 0|
|00002820| 3a 71 75 69 74 25 3d b9 | 0d 11 da 15 c9 20 33 3a |:quit%=.|..... 3:|
|00002830| f2 64 61 74 61 6c 6f 61 | 64 28 62 25 29 0d 11 e4 |.dataloa|d(b%)...|
|00002840| 0a c9 20 26 35 30 32 0d | 11 ee 1a 20 62 25 21 31 |.. &502.|... b%!1|
|00002850| 32 3d 62 25 21 38 3a 62 | 25 21 31 36 3d 26 35 30 |2=b%!8:b|%!16=&50|
|00002860| 33 0d 11 f8 28 20 68 65 | 6c 70 25 3d 62 25 2b 32 |3...( he|lp%=b%+2|
|00002870| 30 3a 77 69 6e 64 25 3d | 62 25 21 33 32 3a 69 63 |0:wind%=|b%!32:ic|
|00002880| 6f 6e 25 3d 62 25 21 33 | 36 0d 12 02 20 20 68 65 |on%=b%!3|6... he|
|00002890| 6c 70 24 3d a4 67 65 74 | 68 65 6c 70 28 77 69 6e |lp$=.get|help(win|
|000028a0| 64 25 2c 69 63 6f 6e 25 | 29 0d 12 0c 28 20 24 68 |d%,icon%|)...( $h|
|000028b0| 65 6c 70 25 3d 68 65 6c | 70 24 2b 22 7c 4d 22 3a |elp%=hel|p$+"|M":|
|000028c0| 68 65 6c 70 25 2b 3d a9 | 28 68 65 6c 70 24 29 2b |help%+=.|(help$)+|
|000028d0| 32 0d 12 16 21 20 3f 68 | 65 6c 70 25 3d 30 3a 21 |2...! ?h|elp%=0:!|
|000028e0| 62 25 3d 28 68 65 6c 70 | 25 2b 34 2d 62 25 29 80 |b%=(help|%+4-b%).|
|000028f0| ac 33 0d 12 20 25 20 c8 | 99 20 22 57 69 6d 70 5f |.3.. % .|. "Wimp_|
|00002900| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00002910| 62 25 2c 62 25 21 34 0d | 12 2a 2e c9 20 26 34 30 |b%,b%!4.|.*.. &40|
|00002920| 30 43 31 3a f2 67 65 74 | 6d 6f 64 65 69 6e 66 6f |0C1:.get|modeinfo|
|00002930| 3a e7 20 6f 77 6e 25 20 | 8c 20 f2 6d 79 5f 70 6f |:. own% |. .my_po|
|00002940| 69 6e 74 65 72 0d 12 34 | 05 cb 0d 12 3e 05 e1 0d |inter..4|....>...|
|00002950| 12 48 05 3a 0d 12 52 1b | dd 20 a4 67 65 74 68 65 |.H.:..R.|. .gethe|
|00002960| 6c 70 28 77 69 6e 64 25 | 2c 69 63 6f 6e 25 29 0d |lp(wind%|,icon%).|
|00002970| 12 5c 08 ea 20 68 24 0d | 12 66 0e c8 8e 20 77 69 |.\.. h$.|.f... wi|
|00002980| 6e 64 25 20 ca 0d 12 70 | 09 c9 20 2d 32 3a 0d 12 |nd% ...p|.. -2:..|
|00002990| 7a c7 20 e7 20 69 63 6f | 6e 25 3d 73 69 63 6f 6e |z. . ico|n%=sicon|
|000029a0| 25 20 8c 20 68 24 3d 22 | 54 68 69 73 20 69 73 20 |% . h$="|This is |
|000029b0| 74 68 65 20 22 2b 74 69 | 74 6c 65 24 2b 22 20 61 |the "+ti|tle$+" a|
|000029c0| 70 70 6c 69 63 61 74 69 | 6f 6e 2e 7c 4d 43 6c 69 |pplicati|on.|MCli|
|000029d0| 63 6b 20 77 69 74 68 20 | 53 45 4c 45 43 54 20 74 |ck with |SELECT t|
|000029e0| 6f 20 6f 70 65 6e 20 6d | 61 69 6e 20 77 69 6e 64 |o open m|ain wind|
|000029f0| 6f 77 2c 20 6f 72 20 77 | 69 74 68 20 4d 45 4e 55 |ow, or w|ith MENU|
|00002a00| 20 66 6f 72 20 61 6e 20 | 69 63 6f 6e 62 61 72 20 | for an |iconbar |
|00002a10| 6d 65 6e 75 2e 7c 4d 54 | 6f 20 6c 6f 61 64 20 61 |menu.|MT|o load a|
|00002a20| 20 6e 65 77 20 73 74 72 | 75 63 74 75 72 65 2c 20 | new str|ucture, |
|00002a30| 64 72 61 67 20 61 20 4d | 6f 6c 65 63 75 6c 65 20 |drag a M|olecule |
|00002a40| 66 69 6c 65 20 6f 6e 74 | 6f 20 74 68 69 73 20 69 |file ont|o this i|
|00002a50| 63 6f 6e 2e 22 0d 12 84 | 0b c9 20 69 6e 66 6f 25 |con."...|.. info%|
|00002a60| 0d 12 8e 0f 20 c8 8e 20 | 69 63 6f 6e 25 20 ca 0d |.... .. |icon% ..|
|00002a70| 12 98 52 20 c9 20 32 3a | 20 68 24 3d 22 54 68 69 |..R . 2:| h$="Thi|
|00002a80| 73 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 64 72 |s applic|ation dr|
|00002a90| 61 77 73 20 62 61 6c 6c | 20 61 6e 64 20 73 74 69 |aws ball| and sti|
|00002aa0| 63 6b 20 72 65 70 72 65 | 73 65 6e 74 61 74 69 6f |ck repre|sentatio|
|00002ab0| 6e 73 20 6f 66 20 6d 6f | 6c 65 63 75 6c 65 73 2e |ns of mo|lecules.|
|00002ac0| 22 0d 12 a2 a8 20 c9 20 | 33 3a 20 68 24 3d 22 54 |".... . |3: h$="T|
|00002ad0| 68 65 20 61 75 74 68 6f | 72 2c 20 44 72 2e 20 52 |he autho|r, Dr. R|
|00002ae0| 6f 64 65 72 69 63 6b 20 | 46 65 72 67 75 73 6f 6e |oderick |Ferguson|
|00002af0| 2c 20 63 61 6e 20 62 65 | 20 63 6f 6e 74 61 63 74 |, can be| contact|
|00002b00| 65 64 20 61 74 20 3a 2d | 7c 4d 48 65 72 69 6f 74 |ed at :-||MHeriot|
|00002b10| 2d 57 61 74 74 20 55 6e | 69 76 65 72 73 69 74 79 |-Watt Un|iversity|
|00002b20| 20 43 68 65 6d 69 73 74 | 72 79 20 44 65 70 61 72 | Chemist|ry Depar|
|00002b30| 74 6d 65 6e 74 20 28 45 | 64 69 6e 62 75 72 67 68 |tment (E|dinburgh|
|00002b40| 2c 20 53 63 6f 74 6c 61 | 6e 64 29 7c 4d 6f 6e 20 |, Scotla|nd)|Mon |
|00002b50| 30 33 31 2d 34 34 39 2d | 35 31 31 31 20 65 78 74 |031-449-|5111 ext|
|00002b60| 6e 2e 20 34 31 30 39 2e | 22 0d 12 ac 52 20 c9 20 |n. 4109.|"...R . |
|00002b70| 34 3a 20 68 24 3d 22 54 | 68 69 73 20 69 73 20 74 |4: h$="T|his is t|
|00002b80| 68 65 20 6c 61 74 65 73 | 74 20 76 65 72 73 69 6f |he lates|t versio|
|00002b90| 6e 2e 20 28 46 75 74 75 | 72 65 20 76 65 72 73 69 |n. (Futu|re versi|
|00002ba0| 6f 6e 73 20 6d 61 79 20 | 62 65 20 77 72 69 74 74 |ons may |be writt|
|00002bb0| 65 6e 20 69 6e 20 43 21 | 29 2e 22 0d 12 b6 06 20 |en in C!|).".... |
|00002bc0| 7f 0d 12 c0 2d 20 68 24 | 3d 22 54 68 69 73 20 69 |....- h$|="This i|
|00002bd0| 73 20 74 68 65 20 22 2b | 74 69 74 6c 65 24 2b 22 |s the "+|title$+"|
|00002be0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 2e 22 0d 12 | applica|tion."..|
|00002bf0| ca 06 20 cb 0d 12 d4 0b | c9 20 6d 61 69 6e 25 0d |.. .....|. main%.|
|00002c00| 12 de da 20 68 24 3d 22 | 54 68 69 73 20 69 73 20 |... h$="|This is |
|00002c10| 74 68 65 20 6d 61 69 6e | 20 64 69 73 70 6c 61 79 |the main| display|
|00002c20| 20 77 69 6e 64 6f 77 2e | 20 43 6c 69 63 6b 20 53 | window.| Click S|
|00002c30| 45 4c 45 43 54 20 6f 6e | 20 61 6e 20 61 74 6f 6d |ELECT on| an atom|
|00002c40| 20 74 6f 20 73 65 6c 65 | 63 74 20 69 74 2e 7c 4d | to sele|ct it.|M|
|00002c50| 43 6c 69 63 6b 20 53 45 | 4c 45 43 54 20 6f 6e 20 |Click SE|LECT on |
|00002c60| 61 20 6e 65 69 67 68 62 | 6f 75 72 69 6e 67 20 61 |a neighb|ouring a|
|00002c70| 74 6f 6d 20 74 6f 20 70 | 69 63 6b 20 61 20 62 6f |tom to p|ick a bo|
|00002c80| 6e 64 20 66 6f 72 20 74 | 68 65 20 64 69 68 65 64 |nd for t|he dihed|
|00002c90| 72 61 6c 20 64 72 69 76 | 65 72 2e 7c 4d 43 6c 69 |ral driv|er.|MCli|
|00002ca0| 63 6b 20 53 45 4c 45 43 | 54 20 6f 6e 20 74 68 65 |ck SELEC|T on the|
|00002cb0| 20 62 61 63 6b 67 72 6f | 75 6e 64 20 74 6f 20 63 | backgro|und to c|
|00002cc0| 6c 65 61 72 20 70 72 65 | 76 69 6f 75 73 20 73 65 |lear pre|vious se|
|00002cd0| 6c 65 63 74 69 6f 6e 2e | 22 0d 12 e8 10 c9 20 63 |lection.|"..... c|
|00002ce0| 6f 6e 73 74 61 6e 74 73 | 25 0d 12 f2 0f 20 c8 8e |onstants|%.... ..|
|00002cf0| 20 69 63 6f 6e 25 20 ca | 0d 12 fc 3d 20 c9 20 33 | icon% .|...= . 3|
|00002d00| 3a 20 68 24 3d 22 45 6e | 74 65 72 20 74 68 65 20 |: h$="En|ter the |
|00002d10| 61 6e 67 75 6c 61 72 20 | 73 74 65 70 20 73 69 7a |angular |step siz|
|00002d20| 65 20 28 69 6e 20 64 65 | 67 72 65 65 73 29 20 68 |e (in de|grees) h|
|00002d30| 65 72 65 2e 22 0d 13 06 | 24 20 c9 20 34 3a 20 68 |ere."...|$ . 4: h|
|00002d40| 24 3d 22 45 6e 74 65 72 | 20 74 68 65 20 73 63 61 |$="Enter| the sca|
|00002d50| 6c 65 20 68 65 72 65 2e | 22 0d 13 10 43 20 c9 20 |le here.|"...C . |
|00002d60| 35 3a 20 68 24 3d 22 45 | 6e 74 65 72 20 61 6e 79 |5: h$="E|nter any|
|00002d70| 20 63 68 61 6e 67 65 73 | 20 74 6f 20 74 68 65 20 | changes| to the |
|00002d80| 74 69 74 6c 65 20 6f 66 | 20 74 68 65 20 6d 6f 6c |title of| the mol|
|00002d90| 65 63 75 6c 65 20 68 65 | 72 65 2e 22 0d 13 1a 06 |ecule he|re."....|
|00002da0| 20 7f 0d 13 24 3f 20 68 | 24 3d 22 54 68 69 73 20 | ...$? h|$="This |
|00002db0| 77 69 6e 64 6f 77 20 69 | 73 20 66 6f 72 20 61 64 |window i|s for ad|
|00002dc0| 6a 75 73 74 69 6e 67 20 | 73 6f 6d 65 20 64 69 73 |justing |some dis|
|00002dd0| 70 6c 61 79 20 70 61 72 | 61 6d 65 74 65 72 73 2e |play par|ameters.|
|00002de0| 22 0d 13 2e 06 20 cb 0d | 13 38 0b c9 20 70 61 6e |".... ..|.8.. pan|
|00002df0| 65 25 0d 13 42 0f 20 c8 | 8e 20 69 63 6f 6e 25 20 |e%..B. .|. icon% |
|00002e00| ca 0d 13 4c 92 20 c9 20 | 30 3a e7 20 53 65 6c 65 |...L. . |0:. Sele|
|00002e10| 63 74 65 64 25 3c 3e 30 | 20 8c 20 68 24 3d 22 43 |cted%<>0| . h$="C|
|00002e20| 6c 69 63 6b 20 68 65 72 | 65 20 74 6f 20 6d 6f 76 |lick her|e to mov|
|00002e30| 65 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 20 61 |e the se|lected a|
|00002e40| 74 6f 6d 20 74 6f 20 74 | 68 65 20 6f 72 69 67 69 |tom to t|he origi|
|00002e50| 6e 2e 22 20 8b 20 68 24 | 3d 22 43 6c 69 63 6b 20 |n." . h$|="Click |
|00002e60| 68 65 72 65 20 74 6f 20 | 63 65 6e 74 72 65 20 74 |here to |centre t|
|00002e70| 68 65 20 77 68 6f 6c 65 | 20 6d 6f 6c 65 63 75 6c |he whole| molecul|
|00002e80| 65 20 6f 6e 74 6f 20 74 | 68 65 20 6f 72 69 67 69 |e onto t|he origi|
|00002e90| 6e 2e 22 0d 13 56 59 20 | c9 20 31 3a 68 24 3d 22 |n."..VY |. 1:h$="|
|00002ea0| 43 6c 69 63 6b 20 68 65 | 72 65 20 66 6f 72 20 58 |Click he|re for X|
|00002eb0| 20 41 78 69 73 20 72 6f | 74 61 74 69 6f 6e 2c 20 | Axis ro|tation, |
|00002ec0| 53 45 4c 45 43 54 20 3d | 20 41 6e 74 69 63 6c 6f |SELECT =| Anticlo|
|00002ed0| 63 6b 77 69 73 65 2c 20 | 41 44 4a 55 53 54 20 3d |ckwise, |ADJUST =|
|00002ee0| 20 43 6c 6f 63 6b 77 69 | 73 65 2e 22 0d 13 60 59 | Clockwi|se."..`Y|
|00002ef0| 20 c9 20 32 3a 68 24 3d | 22 43 6c 69 63 6b 20 68 | . 2:h$=|"Click h|
|00002f00| 65 72 65 20 66 6f 72 20 | 59 20 41 78 69 73 20 72 |ere for |Y Axis r|
|00002f10| 6f 74 61 74 69 6f 6e 2c | 20 53 45 4c 45 43 54 20 |otation,| SELECT |
|00002f20| 3d 20 41 6e 74 69 63 6c | 6f 63 6b 77 69 73 65 2c |= Anticl|ockwise,|
|00002f30| 20 41 44 4a 55 53 54 20 | 3d 20 43 6c 6f 63 6b 77 | ADJUST |= Clockw|
|00002f40| 69 73 65 2e 22 0d 13 6a | 59 20 c9 20 33 3a 68 24 |ise."..j|Y . 3:h$|
|00002f50| 3d 22 43 6c 69 63 6b 20 | 68 65 72 65 20 66 6f 72 |="Click |here for|
|00002f60| 20 5a 20 41 78 69 73 20 | 72 6f 74 61 74 69 6f 6e | Z Axis |rotation|
|00002f70| 2c 20 53 45 4c 45 43 54 | 20 3d 20 41 6e 74 69 63 |, SELECT| = Antic|
|00002f80| 6c 6f 63 6b 77 69 73 65 | 2c 20 41 44 4a 55 53 54 |lockwise|, ADJUST|
|00002f90| 20 3d 20 43 6c 6f 63 6b | 77 69 73 65 2e 22 0d 13 | = Clock|wise."..|
|00002fa0| 74 65 20 c9 20 34 3a e7 | 20 64 72 69 76 65 72 25 |te . 4:.| driver%|
|00002fb0| 20 8c 20 68 24 3d 22 43 | 6c 69 63 6b 20 68 65 72 | . h$="C|lick her|
|00002fc0| 65 20 66 6f 72 20 64 69 | 68 65 64 72 61 6c 20 64 |e for di|hedral d|
|00002fd0| 72 69 76 65 72 2c 20 53 | 45 4c 45 43 54 20 3d 20 |river, S|ELECT = |
|00002fe0| 41 6e 74 69 63 6c 6f 63 | 6b 77 69 73 65 2c 20 41 |Anticloc|kwise, A|
|00002ff0| 44 4a 55 53 54 20 3d 20 | 43 6c 6f 63 6b 77 69 73 |DJUST = |Clockwis|
|00003000| 65 2e 22 0d 13 7e 52 20 | c9 20 35 3a 68 24 3d 22 |e."..~R |. 5:h$="|
|00003010| 43 6c 69 63 6b 20 68 65 | 72 65 20 74 6f 20 61 6c |Click he|re to al|
|00003020| 74 65 72 20 74 68 65 20 | 73 63 61 6c 65 2c 20 53 |ter the |scale, S|
|00003030| 45 4c 45 43 54 20 3d 20 | 44 65 63 72 65 61 73 65 |ELECT = |Decrease|
|00003040| 2c 20 41 44 4a 55 53 54 | 20 3d 20 49 6e 63 72 65 |, ADJUST| = Incre|
|00003050| 61 73 65 2e 22 0d 13 88 | 52 20 c9 20 36 3a 68 24 |ase."...|R . 6:h$|
|00003060| 3d 22 43 6c 69 63 6b 20 | 68 65 72 65 20 74 6f 20 |="Click |here to |
|00003070| 61 6c 74 65 72 20 74 68 | 65 20 73 63 61 6c 65 2c |alter th|e scale,|
|00003080| 20 53 45 4c 45 43 54 20 | 3d 20 49 6e 63 72 65 61 | SELECT |= Increa|
|00003090| 73 65 2c 20 41 44 4a 55 | 53 54 20 3d 20 44 65 63 |se, ADJU|ST = Dec|
|000030a0| 72 65 61 73 65 2e 22 0d | 13 92 36 20 c9 20 37 3a |rease.".|..6 . 7:|
|000030b0| 68 24 3d 22 43 6c 69 63 | 6b 20 68 65 72 65 20 74 |h$="Clic|k here t|
|000030c0| 6f 20 6f 70 65 6e 20 74 | 68 65 20 43 6f 6e 73 74 |o open t|he Const|
|000030d0| 61 6e 74 73 20 77 69 6e | 64 6f 77 2e 22 0d 13 9c |ants win|dow."...|
|000030e0| 06 20 cb 0d 13 a6 05 cb | 0d 13 b0 07 3d 68 24 0d |. ......|....=h$.|
|000030f0| 13 ba 05 3a 0d 13 c4 13 | dd 20 f2 64 61 74 61 6c |...:....|. .datal|
|00003100| 6f 61 64 28 62 25 29 0d | 13 ce 11 f4 20 4c 4f 43 |oad(b%).|.... LOC|
|00003110| 41 4c 20 66 69 6c 65 24 | 0d 13 d8 12 e7 20 62 25 |AL file$|..... b%|
|00003120| 21 34 30 3d 26 33 46 46 | 20 8c 0d 13 e2 17 66 69 |!40=&3FF| .....fi|
|00003130| 6c 65 24 3d a4 67 6e 61 | 6d 65 28 62 25 2b 34 34 |le$=.gna|me(b%+44|
|00003140| 29 0d 13 ec 15 f2 6c 6f | 61 64 5f 64 61 74 61 28 |).....lo|ad_data(|
|00003150| 66 69 6c 65 24 29 0d 13 | f6 35 e7 20 a4 6c 65 61 |file$)..|.5. .lea|
|00003160| 66 28 66 69 6c 65 24 29 | 3d 22 53 63 72 61 70 46 |f(file$)|="ScrapF|
|00003170| 69 6c 65 22 20 8c 20 2a | 44 45 4c 45 54 45 20 3c |ile" . *|DELETE <|
|00003180| 57 69 6d 70 24 53 63 72 | 61 70 3e 0d 14 00 22 f4 |Wimp$Scr|ap>...".|
|00003190| 20 61 63 6b 6e 6f 77 6c | 65 64 67 65 20 72 65 63 | acknowl|edge rec|
|000031a0| 65 69 70 74 20 6f 66 20 | 64 61 74 61 2e 0d 14 0a |eipt of |data....|
|000031b0| 0e 62 25 21 31 32 3d 62 | 25 21 38 0d 14 14 0b 62 |.b%!12=b|%!8....b|
|000031c0| 25 21 31 36 3d 34 0d 14 | 1e 24 c8 99 20 22 57 69 |%!16=4..|.$.. "Wi|
|000031d0| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|000031e0| 31 37 2c 62 25 2c 62 25 | 21 34 0d 14 28 0b f2 72 |17,b%,b%|!4..(..r|
|000031f0| 65 63 61 6c 63 0d 14 32 | 1d f2 72 65 74 69 74 6c |ecalc..2|..retitl|
|00003200| 65 28 6d 61 69 6e 25 2c | 4d 6f 6c 65 63 75 6c 65 |e(main%,|Molecule|
|00003210| 24 29 0d 14 3c 17 f2 75 | 70 64 61 74 65 5f 77 69 |$)..<..u|pdate_wi|
|00003220| 6e 64 28 6d 61 69 6e 25 | 29 0d 14 46 05 cd 0d 14 |nd(main%|)..F....|
|00003230| 50 05 e1 0d 14 5a 05 3a | 0d 14 64 17 dd 20 a4 67 |P....Z.:|..d.. .g|
|00003240| 6e 61 6d 65 28 70 74 72 | 25 29 3a ea 20 66 24 0d |name(ptr|%):. f$.|
|00003250| 14 6e 21 c8 95 20 3f 70 | 74 72 25 3a 66 24 2b 3d |.n!.. ?p|tr%:f$+=|
|00003260| bd 3f 70 74 72 25 3a 70 | 74 72 25 2b 3d 31 3a ce |.?ptr%:p|tr%+=1:.|
|00003270| 0d 14 78 07 3d 66 24 0d | 14 82 05 3a 0d 14 8c 12 |..x.=f$.|...:....|
|00003280| dd 20 a4 6c 65 61 66 28 | 70 61 74 68 24 29 0d 14 |. .leaf(|path$)..|
|00003290| 96 30 c8 95 20 a7 70 61 | 74 68 24 2c 22 2e 22 29 |.0.. .pa|th$,".")|
|000032a0| 3a 70 61 74 68 24 3d c1 | 70 61 74 68 24 2c a7 70 |:path$=.|path$,.p|
|000032b0| 61 74 68 24 2c 22 2e 22 | 29 2b 31 29 3a ce 0d 14 |ath$,"."|)+1):...|
|000032c0| a0 0a 3d 70 61 74 68 24 | 0d 14 aa 05 3a 0d 14 b4 |..=path$|....:...|
|000032d0| 14 dd 20 f2 6c 6f 61 64 | 5f 64 61 74 61 28 46 24 |.. .load|_data(F$|
|000032e0| 29 0d 14 be 1c 52 28 29 | 3d 30 3a 43 6f 6e 25 28 |)....R()|=0:Con%(|
|000032f0| 29 3d 30 3a 54 79 70 65 | 25 28 29 3d 30 0d 14 c8 |)=0:Type|%()=0...|
|00003300| 0c 48 25 3d 8e 28 46 24 | 29 0d 14 d2 05 f5 0d 14 |.H%=.(F$|).......|
|00003310| dc 0b 4c 24 3d be 23 48 | 25 0d 14 e6 13 fd 20 c0 |..L$=.#H|%..... .|
|00003320| 4c 24 2c 34 29 3d 22 44 | 41 54 41 22 0d 14 f0 12 |L$,4)="D|ATA"....|
|00003330| 41 74 6f 6d 73 25 3d bb | 28 be 23 48 25 29 0d 14 |Atoms%=.|(.#H%)..|
|00003340| fa 13 e3 20 41 25 3d 31 | 20 b8 20 41 74 6f 6d 73 |... A%=1| . Atoms|
|00003350| 25 0d 15 04 0b 4c 24 3d | be 23 48 25 0d 15 0e 1c |%....L$=|.#H%....|
|00003360| 52 28 41 25 2c 30 29 3d | a4 65 78 74 72 61 63 74 |R(A%,0)=|.extract|
|00003370| 28 4c 24 2c 22 2c 22 29 | 0d 15 18 1c 52 28 41 25 |(L$,",")|....R(A%|
|00003380| 2c 31 29 3d a4 65 78 74 | 72 61 63 74 28 4c 24 2c |,1)=.ext|ract(L$,|
|00003390| 22 2c 22 29 0d 15 22 1c | 52 28 41 25 2c 32 29 3d |",")..".|R(A%,2)=|
|000033a0| a4 65 78 74 72 61 63 74 | 28 4c 24 2c 22 2c 22 29 |.extract|(L$,",")|
|000033b0| 0d 15 2c 1e 54 79 70 65 | 25 28 41 25 29 3d a4 65 |..,.Type|%(A%)=.e|
|000033c0| 78 74 72 61 63 74 28 4c | 24 2c 22 2c 22 29 0d 15 |xtract(L|$,",")..|
|000033d0| 36 30 e3 20 42 25 3d 30 | 20 b8 20 33 3a 43 6f 6e |60. B%=0| . 3:Con|
|000033e0| 25 28 41 25 2c 42 25 29 | 3d a4 65 78 74 72 61 63 |%(A%,B%)|=.extrac|
|000033f0| 74 28 4c 24 2c 22 2c 22 | 29 3a ed 20 42 25 0d 15 |t(L$,","|):. B%..|
|00003400| 40 08 ed 20 41 25 0d 15 | 4a 05 f5 0d 15 54 0b 4c |@.. A%..|J....T.L|
|00003410| 24 3d be 23 48 25 0d 15 | 5e 15 fd 20 c0 4c 24 2c |$=.#H%..|^.. .L$,|
|00003420| 36 29 3d 22 4c 45 47 45 | 4e 44 22 0d 15 68 12 4d |6)="LEGE|ND"..h.M|
|00003430| 6f 6c 65 63 75 6c 65 24 | 3d be 23 48 25 0d 15 72 |olecule$|=.#H%..r|
|00003440| 08 d9 23 48 25 0d 15 7c | 14 77 69 6e 64 25 3d 63 |..#H%..||.wind%=c|
|00003450| 6f 6e 73 74 61 6e 74 73 | 25 0d 15 86 1c f2 73 65 |onstants|%.....se|
|00003460| 74 76 61 72 69 63 6f 6e | 28 35 2c 4d 6f 6c 65 63 |tvaricon|(5,Molec|
|00003470| 75 6c 65 24 29 0d 15 90 | 14 f2 63 72 65 61 74 65 |ule$)...|..create|
|00003480| 5f 62 6f 6e 64 6c 69 73 | 74 0d 15 9a 05 e1 0d 15 |_bondlis|t.......|
|00003490| a4 05 3a 0d 15 ae 17 dd | 20 a4 65 78 74 72 61 63 |..:.....| .extrac|
|000034a0| 74 28 f8 20 4c 24 2c 54 | 24 29 0d 15 b8 0e ea 20 |t(. L$,T|$)..... |
|000034b0| 41 25 2c 41 24 2c 42 24 | 0d 15 c2 0e 41 25 3d a7 |A%,A$,B$|....A%=.|
|000034c0| 4c 24 2c 54 24 29 0d 15 | cc 19 e7 20 41 25 3e 30 |L$,T$)..|... A%>0|
|000034d0| 20 8c 20 42 24 3d c1 4c | 24 2c 41 25 2b 31 29 0d | . B$=.L|$,A%+1).|
|000034e0| 15 d6 10 41 24 3d c0 4c | 24 2c 41 25 2d 31 29 0d |...A$=.L|$,A%-1).|
|000034f0| 15 e0 09 4c 24 3d 42 24 | 0d 15 ea 0a 3d bb 28 41 |...L$=B$|....=.(A|
|00003500| 24 29 0d 15 f4 05 3a 0d | 15 fe 16 dd 20 f2 63 72 |$)....:.|.... .cr|
|00003510| 65 61 74 65 5f 62 6f 6e | 64 6c 69 73 74 0d 16 08 |eate_bon|dlist...|
|00003520| 0e ea 20 41 25 2c 42 25 | 2c 43 25 0d 16 12 08 43 |.. A%,B%|,C%....C|
|00003530| 25 3d 30 0d 16 1c 13 e3 | 20 41 25 3d 31 20 b8 20 |%=0.....| A%=1 . |
|00003540| 41 74 6f 6d 73 25 0d 16 | 26 08 42 25 3d 30 0d 16 |Atoms%..|&.B%=0..|
|00003550| 30 15 c8 95 20 43 6f 6e | 25 28 41 25 2c 42 25 29 |0... Con|%(A%,B%)|
|00003560| 3c 3e 30 0d 16 3a 16 e7 | 20 43 6f 6e 25 28 41 25 |<>0..:..| Con%(A%|
|00003570| 2c 42 25 29 3e 41 25 20 | 8c 0d 16 44 09 43 25 2b |,B%)>A% |...D.C%+|
|00003580| 3d 31 0d 16 4e 12 42 6f | 6e 64 25 28 43 25 2c 30 |=1..N.Bo|nd%(C%,0|
|00003590| 29 3d 41 25 0d 16 58 1b | 42 6f 6e 64 25 28 43 25 |)=A%..X.|Bond%(C%|
|000035a0| 2c 31 29 3d 43 6f 6e 25 | 28 41 25 2c 42 25 29 0d |,1)=Con%|(A%,B%).|
|000035b0| 16 62 05 cd 0d 16 6c 09 | 42 25 2b 3d 31 0d 16 76 |.b....l.|B%+=1..v|
|000035c0| 05 ce 0d 16 80 08 ed 20 | 41 25 0d 16 8a 0d 42 6f |....... |A%....Bo|
|000035d0| 6e 64 73 25 3d 43 25 0d | 16 94 05 e1 0d 16 9e 05 |nds%=C%.|........|
|000035e0| 3a 0d 16 a8 14 dd 20 f2 | 69 6e 69 74 33 64 28 41 |:..... .|init3d(A|
|000035f0| 6e 67 6c 65 29 0d 16 b2 | 15 ea 20 63 74 68 2c 73 |ngle)...|.. cth,s|
|00003600| 74 68 2c 63 70 68 2c 73 | 70 68 0d 16 bc 13 63 74 |th,cph,s|ph....ct|
|00003610| 68 3d 9b 28 b2 28 41 6e | 67 6c 65 29 29 0d 16 c6 |h=.(.(An|gle))...|
|00003620| 13 73 74 68 3d b5 28 b2 | 28 41 6e 67 6c 65 29 29 |.sth=.(.|(Angle))|
|00003630| 0d 16 d0 27 52 6f 74 58 | 28 29 3d 28 31 29 2c 30 |...'RotX|()=(1),0|
|00003640| 2c 30 2c 30 2c 63 74 68 | 2c 2d 73 74 68 2c 30 2c |,0,0,cth|,-sth,0,|
|00003650| 73 74 68 2c 63 74 68 0d | 16 da 28 52 6f 74 58 32 |sth,cth.|..(RotX2|
|00003660| 28 29 3d 28 31 29 2c 30 | 2c 30 2c 30 2c 63 74 68 |()=(1),0|,0,0,cth|
|00003670| 2c 73 74 68 2c 30 2c 2d | 73 74 68 2c 63 74 68 0d |,sth,0,-|sth,cth.|
|00003680| 16 e4 27 52 6f 74 59 28 | 29 3d 28 63 74 68 29 2c |..'RotY(|)=(cth),|
|00003690| 30 2c 73 74 68 2c 30 2c | 31 2c 30 2c 2d 73 74 68 |0,sth,0,|1,0,-sth|
|000036a0| 2c 30 2c 63 74 68 0d 16 | ee 28 52 6f 74 59 32 28 |,0,cth..|.(RotY2(|
|000036b0| 29 3d 28 63 74 68 29 2c | 30 2c 2d 73 74 68 2c 30 |)=(cth),|0,-sth,0|
|000036c0| 2c 31 2c 30 2c 73 74 68 | 2c 30 2c 63 74 68 0d 16 |,1,0,sth|,0,cth..|
|000036d0| f8 27 52 6f 74 5a 28 29 | 3d 28 63 74 68 29 2c 2d |.'RotZ()|=(cth),-|
|000036e0| 73 74 68 2c 30 2c 73 74 | 68 2c 63 74 68 2c 30 2c |sth,0,st|h,cth,0,|
|000036f0| 30 2c 30 2c 31 0d 17 02 | 28 52 6f 74 5a 32 28 29 |0,0,1...|(RotZ2()|
|00003700| 3d 28 63 74 68 29 2c 73 | 74 68 2c 30 2c 2d 73 74 |=(cth),s|th,0,-st|
|00003710| 68 2c 63 74 68 2c 30 2c | 30 2c 30 2c 31 0d 17 0c |h,cth,0,|0,0,1...|
|00003720| 05 e1 0d 17 16 05 3a 0d | 17 20 22 dd 20 f2 69 6e |......:.|. ". .in|
|00003730| 69 74 64 72 69 76 65 72 | 28 f8 20 53 25 2c f8 20 |itdriver|(. S%,. |
|00003740| 45 25 2c 41 6e 67 6c 65 | 29 0d 17 2a 0e ea 20 41 |E%,Angle|)..*.. A|
|00003750| 6c 2c 41 25 2c 4e 25 0d | 17 34 15 c8 8e 20 94 28 |l,A%,N%.|.4... .(|
|00003760| 54 79 70 65 25 28 45 25 | 29 29 20 ca 0d 17 3e 2a |Type%(E%|)) ...>*|
|00003770| c9 20 35 2c 37 2c 31 31 | 2c 31 32 2c 31 33 2c 31 |. 5,7,11|,12,13,1|
|00003780| 34 2c 32 30 2c 32 31 2c | 32 33 2c 32 34 3a c8 94 |4,20,21,|23,24:..|
|00003790| 20 53 25 2c 45 25 0d 17 | 48 05 cb 0d 17 52 11 44 | S%,E%..|H....R.D|
|000037a0| 53 25 3d 53 25 3a 44 45 | 25 3d 45 25 0d 17 5c 19 |S%=S%:DE|%=E%..\.|
|000037b0| f2 64 72 69 76 65 72 5f | 61 78 69 73 28 44 53 25 |.driver_|axis(DS%|
|000037c0| 2c 44 45 25 29 0d 17 66 | 17 f2 64 72 69 76 65 72 |,DE%)..f|..driver|
|000037d0| 61 74 6f 6d 73 28 53 25 | 2c 45 25 29 0d 17 70 05 |atoms(S%|,E%)..p.|
|000037e0| e1 0d 17 7a 05 3a 0d 17 | 84 19 dd 20 f2 64 72 69 |...z.:..|... .dri|
|000037f0| 76 65 72 5f 61 78 69 73 | 28 53 25 2c 45 25 29 0d |ver_axis|(S%,E%).|
|00003800| 17 8e 19 ea 20 41 25 2c | 42 25 2c 4e 25 2c 6e 31 |.... A%,|B%,N%,n1|
|00003810| 2c 6e 32 2c 6e 33 2c 6e | 0d 17 98 30 41 25 3d 2d |,n2,n3,n|...0A%=-|
|00003820| 31 3a f5 3a 41 25 2b 3d | 31 3a 4e 25 3d 43 6f 6e |1:.:A%+=|1:N%=Con|
|00003830| 25 28 45 25 2c 41 25 29 | 3a fd 20 4e 25 3c 3e 53 |%(E%,A%)|:. N%<>S|
|00003840| 25 20 84 20 41 25 3d 33 | 0d 17 a2 3c 6e 31 3d 52 |% . A%=3|...<n1=R|
|00003850| 28 45 25 2c 30 29 2d 52 | 28 53 25 2c 30 29 3a 6e |(E%,0)-R|(S%,0):n|
|00003860| 32 3d 52 28 45 25 2c 31 | 29 2d 52 28 53 25 2c 31 |2=R(E%,1|)-R(S%,1|
|00003870| 29 3a 6e 33 3d 52 28 45 | 25 2c 32 29 2d 52 28 53 |):n3=R(E|%,2)-R(S|
|00003880| 25 2c 32 29 0d 17 ac 1a | 6e 3d b6 28 6e 31 2a 6e |%,2)....|n=.(n1*n|
|00003890| 31 2b 6e 32 2a 6e 32 2b | 6e 33 2a 6e 33 29 0d 17 |1+n2*n2+|n3*n3)..|
|000038a0| b6 1b 6e 31 3d 6e 31 2f | 6e 3a 6e 32 3d 6e 32 2f |..n1=n1/|n:n2=n2/|
|000038b0| 6e 3a 6e 33 3d 6e 33 2f | 6e 0d 17 c0 23 43 6f 73 |n:n3=n3/|n...#Cos|
|000038c0| 3d 9b 28 b2 28 41 6e 67 | 6c 65 29 29 3a 53 69 6e |=.(.(Ang|le)):Sin|
|000038d0| 3d b5 28 b2 28 41 6e 67 | 6c 65 29 29 0d 17 ca 1c |=.(.(Ang|le))....|
|000038e0| 52 6f 74 41 31 31 3d 28 | 31 2d 43 6f 73 29 2a 6e |RotA11=(|1-Cos)*n|
|000038f0| 31 2a 6e 31 2b 43 6f 73 | 0d 17 d4 1f 52 6f 74 41 |1*n1+Cos|....RotA|
|00003900| 31 32 3d 28 31 2d 43 6f | 73 29 2a 6e 31 2a 6e 32 |12=(1-Co|s)*n1*n2|
|00003910| 2b 6e 33 2a 53 69 6e 0d | 17 de 1f 52 6f 74 41 31 |+n3*Sin.|...RotA1|
|00003920| 33 3d 28 31 2d 43 6f 73 | 29 2a 6e 31 2a 6e 33 2d |3=(1-Cos|)*n1*n3-|
|00003930| 6e 32 2a 53 69 6e 0d 17 | e8 1f 52 6f 74 41 32 31 |n2*Sin..|..RotA21|
|00003940| 3d 28 31 2d 43 6f 73 29 | 2a 6e 32 2a 6e 31 2d 6e |=(1-Cos)|*n2*n1-n|
|00003950| 33 2a 53 69 6e 0d 17 f2 | 1c 52 6f 74 41 32 32 3d |3*Sin...|.RotA22=|
|00003960| 28 31 2d 43 6f 73 29 2a | 6e 32 2a 6e 32 2b 43 6f |(1-Cos)*|n2*n2+Co|
|00003970| 73 0d 17 fc 1f 52 6f 74 | 41 32 33 3d 28 31 2d 43 |s....Rot|A23=(1-C|
|00003980| 6f 73 29 2a 6e 32 2a 6e | 33 2b 6e 31 2a 53 69 6e |os)*n2*n|3+n1*Sin|
|00003990| 0d 18 06 1f 52 6f 74 41 | 33 31 3d 28 31 2d 43 6f |....RotA|31=(1-Co|
|000039a0| 73 29 2a 6e 33 2a 6e 31 | 2b 6e 32 2a 53 69 6e 0d |s)*n3*n1|+n2*Sin.|
|000039b0| 18 10 1f 52 6f 74 41 33 | 32 3d 28 31 2d 43 6f 73 |...RotA3|2=(1-Cos|
|000039c0| 29 2a 6e 33 2a 6e 32 2d | 6e 31 2a 53 69 6e 0d 18 |)*n3*n2-|n1*Sin..|
|000039d0| 1a 1c 52 6f 74 41 33 33 | 3d 28 31 2d 43 6f 73 29 |..RotA33|=(1-Cos)|
|000039e0| 2a 6e 33 2a 6e 33 2b 43 | 6f 73 0d 18 24 11 52 6f |*n3*n3+C|os..$.Ro|
|000039f0| 74 42 31 31 3d 52 6f 74 | 41 31 31 0d 18 2e 1f 52 |tB11=Rot|A11....R|
|00003a00| 6f 74 42 31 32 3d 28 31 | 2d 43 6f 73 29 2a 6e 31 |otB12=(1|-Cos)*n1|
|00003a10| 2a 6e 32 2d 6e 33 2a 53 | 69 6e 0d 18 38 1f 52 6f |*n2-n3*S|in..8.Ro|
|00003a20| 74 42 31 33 3d 28 31 2d | 43 6f 73 29 2a 6e 31 2a |tB13=(1-|Cos)*n1*|
|00003a30| 6e 33 2b 6e 32 2a 53 69 | 6e 0d 18 42 1f 52 6f 74 |n3+n2*Si|n..B.Rot|
|00003a40| 42 32 31 3d 28 31 2d 43 | 6f 73 29 2a 6e 32 2a 6e |B21=(1-C|os)*n2*n|
|00003a50| 31 2b 6e 33 2a 53 69 6e | 0d 18 4c 11 52 6f 74 42 |1+n3*Sin|..L.RotB|
|00003a60| 32 32 3d 52 6f 74 41 32 | 32 0d 18 56 1f 52 6f 74 |22=RotA2|2..V.Rot|
|00003a70| 42 32 33 3d 28 31 2d 43 | 6f 73 29 2a 6e 32 2a 6e |B23=(1-C|os)*n2*n|
|00003a80| 33 2d 6e 31 2a 53 69 6e | 0d 18 60 1f 52 6f 74 42 |3-n1*Sin|..`.RotB|
|00003a90| 33 31 3d 28 31 2d 43 6f | 73 29 2a 6e 33 2a 6e 31 |31=(1-Co|s)*n3*n1|
|00003aa0| 2d 6e 32 2a 53 69 6e 0d | 18 6a 1f 52 6f 74 42 33 |-n2*Sin.|.j.RotB3|
|00003ab0| 32 3d 28 31 2d 43 6f 73 | 29 2a 6e 33 2a 6e 32 2b |2=(1-Cos|)*n3*n2+|
|00003ac0| 6e 31 2a 53 69 6e 0d 18 | 74 11 52 6f 74 42 33 33 |n1*Sin..|t.RotB33|
|00003ad0| 3d 52 6f 74 41 33 33 0d | 18 7e 0e 64 78 3d 52 28 |=RotA33.|.~.dx=R(|
|00003ae0| 45 25 2c 30 29 0d 18 88 | 0e 64 79 3d 52 28 45 25 |E%,0)...|.dy=R(E%|
|00003af0| 2c 31 29 0d 18 92 0e 64 | 7a 3d 52 28 45 25 2c 32 |,1)....d|z=R(E%,2|
|00003b00| 29 0d 18 9c 0e 64 72 69 | 76 65 72 32 25 3d b9 0d |)....dri|ver2%=..|
|00003b10| 18 a6 05 e1 0d 18 b0 05 | 3a 0d 18 ba 19 dd 20 f2 |........|:..... .|
|00003b20| 64 72 69 76 65 72 61 74 | 6f 6d 73 28 53 25 2c 45 |driverat|oms(S%,E|
|00003b30| 25 29 0d 18 c4 08 ea 20 | 4d 25 0d 18 ce 0c 54 6f |%)..... |M%....To|
|00003b40| 72 25 28 29 3d a3 0d 18 | d8 08 4d 25 3d 30 0d 18 |r%()=...|..M%=0..|
|00003b50| e2 0e 54 6f 72 25 28 53 | 25 29 3d b9 0d 18 ec 0e |..Tor%(S|%)=.....|
|00003b60| 54 6f 72 25 28 45 25 29 | 3d b9 0d 18 f6 17 f2 64 |Tor%(E%)|=......d|
|00003b70| 72 69 76 65 72 5f 61 74 | 6f 6d 28 53 25 2c 45 25 |river_at|om(S%,E%|
|00003b80| 29 0d 19 00 0e 54 6f 72 | 25 28 53 25 29 3d a3 0d |)....Tor|%(S%)=..|
|00003b90| 19 0a 0e 54 6f 72 25 28 | 45 25 29 3d a3 0d 19 14 |...Tor%(|E%)=....|
|00003ba0| 05 e1 0d 19 1e 05 3a 0d | 19 28 19 dd 20 f2 64 72 |......:.|.(.. .dr|
|00003bb0| 69 76 65 72 5f 61 74 6f | 6d 28 53 25 2c 45 25 29 |iver_ato|m(S%,E%)|
|00003bc0| 0d 19 32 13 ea 20 41 25 | 2c 4e 25 2c 41 74 74 25 |..2.. A%|,N%,Att%|
|00003bd0| 2c 43 25 0d 19 3c 08 43 | 25 3d 30 0d 19 46 0e e3 |,C%..<.C|%=0..F..|
|00003be0| 20 41 25 3d 30 20 b8 20 | 33 0d 19 50 1c e7 20 43 | A%=0 . |3..P.. C|
|00003bf0| 6f 6e 25 28 45 25 2c 41 | 25 29 3c 3e 30 20 8c 20 |on%(E%,A|%)<>0 . |
|00003c00| 43 25 2b 3d 31 0d 19 5a | 08 ed 20 41 25 0d 19 64 |C%+=1..Z|.. A%..d|
|00003c10| 0a 41 74 74 25 3d 30 0d | 19 6e 0f e3 20 41 25 3d |.Att%=0.|.n.. A%=|
|00003c20| 30 20 b8 20 43 25 0d 19 | 78 12 4e 25 3d 43 6f 6e |0 . C%..|x.N%=Con|
|00003c30| 25 28 45 25 2c 41 25 29 | 0d 19 82 23 e7 20 4e 25 |%(E%,A%)|...#. N%|
|00003c40| 3c 3e 30 20 80 20 4e 25 | 3c 3e 53 25 20 80 20 54 |<>0 . N%|<>S% . T|
|00003c50| 6f 72 25 28 4e 25 29 3d | a3 20 8c 0d 19 8c 0e 54 |or%(N%)=|. .....T|
|00003c60| 6f 72 25 28 4e 25 29 3d | b9 0d 19 96 09 4d 25 2b |or%(N%)=|.....M%+|
|00003c70| 3d 31 0d 19 a0 15 e7 20 | a4 61 74 74 61 63 68 65 |=1..... |.attache|
|00003c80| 64 28 4e 25 29 20 8c 0d | 19 aa 0b 41 74 74 25 2b |d(N%) ..|...Att%+|
|00003c90| 3d 31 0d 19 b4 11 e7 20 | 41 74 74 25 3d 43 25 20 |=1..... |Att%=C% |
|00003ca0| 8c 20 e1 0d 19 be 05 cc | 0d 19 c8 17 f2 64 72 69 |. ......|.....dri|
|00003cb0| 76 65 72 5f 61 74 6f 6d | 28 45 25 2c 4e 25 29 0d |ver_atom|(E%,N%).|
|00003cc0| 19 d2 05 cd 0d 19 dc 05 | cd 0d 19 e6 08 ed 20 41 |........|...... A|
|00003cd0| 25 0d 19 f0 05 e1 0d 19 | fa 05 3a 0d 1a 04 13 dd |%.......|..:.....|
|00003ce0| 20 a4 61 74 74 61 63 68 | 65 64 28 4e 25 29 0d 1a | .attach|ed(N%)..|
|00003cf0| 0e 08 ea 20 41 25 0d 1a | 18 15 c8 8e 20 94 28 54 |... A%..|.... .(T|
|00003d00| 79 70 65 25 28 4e 25 29 | 29 20 ca 0d 1a 22 27 c9 |ype%(N%)|) ..."'.|
|00003d10| 20 35 2c 37 2c 31 31 2c | 31 32 2c 31 33 2c 31 34 | 5,7,11,|12,13,14|
|00003d20| 2c 32 30 2c 32 31 2c 32 | 33 2c 32 34 3a 20 41 25 |,20,21,2|3,24: A%|
|00003d30| 3d b9 0d 1a 2c 05 7f 0d | 1a 36 08 41 25 3d a3 0d |=...,...|.6.A%=..|
|00003d40| 1a 40 05 cb 0d 1a 4a 07 | 3d 41 25 0d 1a 54 05 3a |.@....J.|=A%..T.:|
|00003d50| 0d 1a 5e 16 dd 20 f2 64 | 72 61 77 33 64 28 78 30 |..^.. .d|raw3d(x0|
|00003d60| 25 2c 79 30 25 29 0d 1a | 68 3f c8 99 20 4f 53 5f |%,y0%)..|h?.. OS_|
|00003d70| 53 4f 70 25 2c 26 31 33 | 34 2c 73 70 2c 22 6d 61 |SOp%,&13|4,sp,"ma|
|00003d80| 69 6e 22 2c 78 30 25 2c | 79 30 25 2d 31 30 32 34 |in",x0%,|y0%-1024|
|00003d90| 2c 30 2c 66 61 63 74 6f | 72 73 25 2c 70 69 78 74 |,0,facto|rs%,pixt|
|00003da0| 72 61 6e 73 25 0d 1a 72 | 05 e1 0d 1a 7c 05 3a 0d |rans%..r|....|.:.|
|00003db0| 1a 86 0d dd 20 f2 72 65 | 63 61 6c 63 0d 1a 90 15 |.... .re|calc....|
|00003dc0| ea 20 52 30 25 2c 52 31 | 25 2c 52 32 25 2c 52 33 |. R0%,R1|%,R2%,R3|
|00003dd0| 25 0d 1a 9a 39 c8 99 20 | 4f 53 5f 53 4f 70 25 2c |%...9.. |OS_SOp%,|
|00003de0| 26 31 33 43 2c 73 70 2c | 22 6d 61 69 6e 22 2c 73 |&13C,sp,|"main",s|
|00003df0| 61 76 65 61 72 65 61 25 | 20 b8 20 52 30 25 2c 52 |avearea%| . R0%,R|
|00003e00| 31 25 2c 52 32 25 2c 52 | 33 25 0d 1a a4 10 ef 20 |1%,R2%,R|3%..... |
|00003e10| 32 33 2c 31 37 2c 34 2c | 31 7c 0d 1a ae 3b ef 20 |23,17,4,|1|...;. |
|00003e20| 32 33 2c 32 2c 26 42 46 | 2c 26 46 42 2c 26 42 46 |23,2,&BF|,&FB,&BF|
|00003e30| 2c 26 46 42 2c 26 42 46 | 2c 26 46 42 2c 26 42 46 |,&FB,&BF|,&FB,&BF|
|00003e40| 2c 26 46 42 3a 20 f4 20 | 50 75 72 70 6c 65 20 3d |,&FB: . |Purple =|
|00003e50| 20 45 43 46 31 0d 1a b8 | 3b ef 20 32 33 2c 33 2c | ECF1...|;. 23,3,|
|00003e60| 26 41 44 2c 26 44 41 2c | 26 41 44 2c 26 44 41 2c |&AD,&DA,|&AD,&DA,|
|00003e70| 26 41 44 2c 26 44 41 2c | 26 41 44 2c 26 44 41 3a |&AD,&DA,|&AD,&DA:|
|00003e80| 20 f4 20 47 72 65 65 6e | 20 20 3d 20 45 43 46 32 | . Green| = ECF2|
|00003e90| 0d 1a c2 3b ef 20 32 33 | 2c 34 2c 26 34 45 2c 26 |...;. 23|,4,&4E,&|
|00003ea0| 45 34 2c 26 34 45 2c 26 | 45 34 2c 26 34 45 2c 26 |E4,&4E,&|E4,&4E,&|
|00003eb0| 45 34 2c 26 34 45 2c 26 | 45 34 3a 20 f4 20 42 72 |E4,&4E,&|E4: . Br|
|00003ec0| 6f 77 6e 20 20 3d 20 45 | 43 46 33 0d 1a cc 3b ef |own = E|CF3...;.|
|00003ed0| 20 32 33 2c 35 2c 26 39 | 44 2c 26 44 39 2c 26 39 | 23,5,&9|D,&D9,&9|
|00003ee0| 44 2c 26 44 39 2c 26 39 | 44 2c 26 44 39 2c 26 39 |D,&D9,&9|D,&D9,&9|
|00003ef0| 44 2c 26 44 39 3a 20 f4 | 20 43 72 65 61 6d 20 20 |D,&D9: .| Cream |
|00003f00| 3d 20 45 43 46 34 0d 1a | d6 0b e6 20 26 38 30 3a |= ECF4..|... &80:|
|00003f10| da 0d 1a e0 0f f2 64 65 | 70 74 68 5f 73 6f 72 74 |......de|pth_sort|
|00003f20| 0d 1a ea 12 f2 64 72 61 | 77 5f 6d 6f 6c 65 63 75 |.....dra|w_molecu|
|00003f30| 6c 65 0d 1a f4 1e c8 99 | 20 4f 53 5f 53 4f 70 25 |le......| OS_SOp%|
|00003f40| 2c 52 30 25 2c 52 31 25 | 2c 52 32 25 2c 52 33 25 |,R0%,R1%|,R2%,R3%|
|00003f50| 0d 1a fe 05 e1 0d 1b 08 | 05 3a 0d 1b 12 17 dd 20 |........|.:..... |
|00003f60| f2 72 6f 74 61 74 65 5f | 58 61 78 69 73 28 64 25 |.rotate_|Xaxis(d%|
|00003f70| 29 0d 1b 1c 2d e7 20 64 | 25 3d b9 20 8c 20 52 28 |)...-. d|%=. . R(|
|00003f80| 29 3d 52 28 29 2e 52 6f | 74 58 28 29 20 8b 20 52 |)=R().Ro|tX() . R|
|00003f90| 28 29 3d 52 28 29 2e 52 | 6f 74 58 32 28 29 0d 1b |()=R().R|otX2()..|
|00003fa0| 26 05 e1 0d 1b 30 05 3a | 0d 1b 3a 17 dd 20 f2 72 |&....0.:|..:.. .r|
|00003fb0| 6f 74 61 74 65 5f 59 61 | 78 69 73 28 64 25 29 0d |otate_Ya|xis(d%).|
|00003fc0| 1b 44 2d e7 20 64 25 3d | b9 20 8c 20 52 28 29 3d |.D-. d%=|. . R()=|
|00003fd0| 52 28 29 2e 52 6f 74 59 | 28 29 20 8b 20 52 28 29 |R().RotY|() . R()|
|00003fe0| 3d 52 28 29 2e 52 6f 74 | 59 32 28 29 0d 1b 4e 05 |=R().Rot|Y2()..N.|
|00003ff0| e1 0d 1b 58 05 3a 0d 1b | 62 17 dd 20 f2 72 6f 74 |...X.:..|b.. .rot|
|00004000| 61 74 65 5f 5a 61 78 69 | 73 28 64 25 29 0d 1b 6c |ate_Zaxi|s(d%)..l|
|00004010| 2d e7 20 64 25 3d b9 20 | 8c 20 52 28 29 3d 52 28 |-. d%=. |. R()=R(|
|00004020| 29 2e 52 6f 74 5a 28 29 | 20 8b 20 52 28 29 3d 52 |).RotZ()| . R()=R|
|00004030| 28 29 2e 52 6f 74 5a 32 | 28 29 0d 1b 76 05 e1 0d |().RotZ2|()..v...|
|00004040| 1b 80 05 3a 0d 1b 8a 11 | dd 20 f2 64 72 69 76 65 |...:....|. .drive|
|00004050| 72 28 64 25 29 0d 1b 94 | 11 e7 20 64 72 69 76 65 |r(d%)...|.. drive|
|00004060| 72 25 3d b9 20 8c 0d 1b | 9e 13 e3 20 41 25 3d 31 |r%=. ...|... A%=1|
|00004070| 20 b8 20 41 74 6f 6d 73 | 25 0d 1b a8 3e e7 20 54 | . Atoms|%...>. T|
|00004080| 6f 72 25 28 41 25 29 20 | 8c 20 f2 72 6f 74 61 78 |or%(A%) |. .rotax|
|00004090| 69 73 28 52 28 41 25 2c | 30 29 2c 52 28 41 25 2c |is(R(A%,|0),R(A%,|
|000040a0| 31 29 2c 52 28 41 25 2c | 32 29 2c 64 25 2c 64 78 |1),R(A%,|2),d%,dx|
|000040b0| 2c 64 79 2c 64 7a 29 0d | 1b b2 08 ed 20 41 25 0d |,dy,dz).|.... A%.|
|000040c0| 1b bc 05 cd 0d 1b c6 05 | e1 0d 1b d0 05 3a 0d 1b |........|.....:..|
|000040d0| da 27 dd 20 f2 72 6f 74 | 61 78 69 73 28 f8 20 78 |.'. .rot|axis(. x|
|000040e0| 2c f8 20 79 2c f8 20 7a | 2c 64 25 2c 64 78 2c 64 |,. y,. z|,d%,dx,d|
|000040f0| 79 2c 64 7a 29 0d 1b e4 | 11 ea 20 61 2c 62 2c 63 |y,dz)...|.. a,b,c|
|00004100| 2c 75 2c 76 2c 77 0d 1b | ee 18 75 3d 78 2d 64 78 |,u,v,w..|..u=x-dx|
|00004110| 3a 76 3d 79 2d 64 79 3a | 77 3d 7a 2d 64 7a 0d 1b |:v=y-dy:|w=z-dz..|
|00004120| f8 0a e7 20 64 25 20 8c | 0d 1c 02 63 61 3d 52 6f |... d% .|...ca=Ro|
|00004130| 74 41 31 31 2a 75 2b 52 | 6f 74 41 31 32 2a 76 2b |tA11*u+R|otA12*v+|
|00004140| 52 6f 74 41 31 33 2a 77 | 2b 64 78 3a 62 3d 52 6f |RotA13*w|+dx:b=Ro|
|00004150| 74 41 32 31 2a 75 2b 52 | 6f 74 41 32 32 2a 76 2b |tA21*u+R|otA22*v+|
|00004160| 52 6f 74 41 32 33 2a 77 | 2b 64 79 3a 63 3d 52 6f |RotA23*w|+dy:c=Ro|
|00004170| 74 41 33 31 2a 75 2b 52 | 6f 74 41 33 32 2a 76 2b |tA31*u+R|otA32*v+|
|00004180| 52 6f 74 41 33 33 2a 77 | 2b 64 7a 0d 1c 0c 05 cc |RotA33*w|+dz.....|
|00004190| 0d 1c 16 63 61 3d 52 6f | 74 42 31 31 2a 75 2b 52 |...ca=Ro|tB11*u+R|
|000041a0| 6f 74 42 31 32 2a 76 2b | 52 6f 74 42 31 33 2a 77 |otB12*v+|RotB13*w|
|000041b0| 2b 64 78 3a 62 3d 52 6f | 74 42 32 31 2a 75 2b 52 |+dx:b=Ro|tB21*u+R|
|000041c0| 6f 74 42 32 32 2a 76 2b | 52 6f 74 42 32 33 2a 77 |otB22*v+|RotB23*w|
|000041d0| 2b 64 79 3a 63 3d 52 6f | 74 42 33 31 2a 75 2b 52 |+dy:c=Ro|tB31*u+R|
|000041e0| 6f 74 42 33 32 2a 76 2b | 52 6f 74 42 33 33 2a 77 |otB32*v+|RotB33*w|
|000041f0| 2b 64 7a 0d 1c 20 05 cd | 0d 1c 2a 0f 78 3d 61 3a |+dz.. ..|..*.x=a:|
|00004200| 79 3d 62 3a 7a 3d 63 0d | 1c 34 05 e1 0d 1c 3e 05 |y=b:z=c.|.4....>.|
|00004210| 3a 0d 1c 48 12 dd 20 f2 | 65 6e 6c 61 72 67 65 28 |:..H.. .|enlarge(|
|00004220| 64 25 29 0d 1c 52 11 ea | 20 77 69 6e 64 25 2c 69 |d%)..R..| wind%,i|
|00004230| 63 6f 6e 25 0d 1c 5c 1c | 77 69 6e 64 25 3d 63 6f |con%..\.|wind%=co|
|00004240| 6e 73 74 61 6e 74 73 25 | 3a 69 63 6f 6e 25 3d 34 |nstants%|:icon%=4|
|00004250| 0d 1c 66 22 e7 20 64 25 | 3d a3 20 8c 20 53 63 61 |..f". d%|=. . Sca|
|00004260| 6c 65 2b 3d 31 30 20 8b | 20 53 63 61 6c 65 2d 3d |le+=10 .| Scale-=|
|00004270| 31 30 0d 1c 70 0e 70 72 | 69 6e 74 66 25 3d 40 25 |10..p.pr|intf%=@%|
|00004280| 0d 1c 7a 10 40 25 3d 26 | 30 31 30 30 30 34 30 34 |..z.@%=&|01000404|
|00004290| 0d 1c 84 1f f2 73 65 74 | 76 61 72 69 63 6f 6e 28 |.....set|varicon(|
|000042a0| 69 63 6f 6e 25 2c c3 28 | 53 63 61 6c 65 29 29 0d |icon%,.(|Scale)).|
|000042b0| 1c 8e 0e 40 25 3d 70 72 | 69 6e 74 66 25 0d 1c 98 |...@%=pr|intf%...|
|000042c0| 05 e1 0d 1c a2 05 3a 0d | 1c ac 11 dd 20 f2 73 68 |......:.|.... .sh|
|000042d0| 72 69 6e 6b 28 64 25 29 | 0d 1c b6 11 ea 20 77 69 |rink(d%)|..... wi|
|000042e0| 6e 64 25 2c 69 63 6f 6e | 25 0d 1c c0 1c 77 69 6e |nd%,icon|%....win|
|000042f0| 64 25 3d 63 6f 6e 73 74 | 61 6e 74 73 25 3a 69 63 |d%=const|ants%:ic|
|00004300| 6f 6e 25 3d 34 0d 1c ca | 22 e7 20 64 25 3d a3 20 |on%=4...|". d%=. |
|00004310| 8c 20 53 63 61 6c 65 2d | 3d 31 30 20 8b 20 53 63 |. Scale-|=10 . Sc|
|00004320| 61 6c 65 2b 3d 31 30 0d | 1c d4 0e 70 72 69 6e 74 |ale+=10.|...print|
|00004330| 66 25 3d 40 25 0d 1c de | 10 40 25 3d 26 30 31 30 |f%=@%...|.@%=&010|
|00004340| 30 30 34 30 34 0d 1c e8 | 1f f2 73 65 74 76 61 72 |00404...|..setvar|
|00004350| 69 63 6f 6e 28 69 63 6f | 6e 25 2c c3 28 53 63 61 |icon(ico|n%,.(Sca|
|00004360| 6c 65 29 29 0d 1c f2 0e | 40 25 3d 70 72 69 6e 74 |le))....|@%=print|
|00004370| 66 25 0d 1c fc 05 e1 0d | 1d 06 05 3a 0d 1d 10 19 |f%......|...:....|
|00004380| dd 20 f2 6d 6f 76 65 5f | 74 6f 5f 6f 72 69 67 69 |. .move_|to_origi|
|00004390| 6e 28 53 25 29 0d 1d 1a | 32 ea 20 58 6d 69 6e 2c |n(S%)...|2. Xmin,|
|000043a0| 58 6d 61 78 2c 59 6d 69 | 6e 2c 59 6d 61 78 2c 5a |Xmax,Ymi|n,Ymax,Z|
|000043b0| 6d 69 6e 2c 5a 6d 61 78 | 2c 41 25 2c 42 25 2c 44 |min,Zmax|,A%,B%,D|
|000043c0| 58 2c 44 59 2c 44 5a 0d | 1d 24 3f 58 6d 69 6e 3d |X,DY,DZ.|.$?Xmin=|
|000043d0| 31 45 36 3a 58 6d 61 78 | 3d 2d 58 6d 69 6e 3a 59 |1E6:Xmax|=-Xmin:Y|
|000043e0| 6d 69 6e 3d 31 45 36 3a | 59 6d 61 78 3d 2d 59 6d |min=1E6:|Ymax=-Ym|
|000043f0| 69 6e 3a 5a 6d 69 6e 3d | 31 45 36 3a 5a 6d 61 78 |in:Zmin=|1E6:Zmax|
|00004400| 3d 2d 5a 6d 69 6e 0d 1d | 2e 0d e7 20 53 25 3c 3e |=-Zmin..|... S%<>|
|00004410| 30 20 8c 0d 1d 38 38 e3 | 20 41 25 3d 31 20 b8 20 |0 ...88.| A%=1 . |
|00004420| 41 74 6f 6d 73 25 3a e3 | 20 42 25 3d 30 20 b8 20 |Atoms%:.| B%=0 . |
|00004430| 32 3a 54 28 41 25 2c 42 | 25 29 3d 52 28 53 25 2c |2:T(A%,B|%)=R(S%,|
|00004440| 42 25 29 3a ed 20 42 25 | 2c 41 25 0d 1d 42 05 cc |B%):. B%|,A%..B..|
|00004450| 0d 1d 4c 13 e3 20 41 25 | 3d 31 20 b8 20 41 74 6f |..L.. A%|=1 . Ato|
|00004460| 6d 73 25 0d 1d 56 21 e7 | 20 52 28 41 25 2c 30 29 |ms%..V!.| R(A%,0)|
|00004470| 3c 58 6d 69 6e 20 8c 20 | 58 6d 69 6e 3d 52 28 41 |<Xmin . |Xmin=R(A|
|00004480| 25 2c 30 29 0d 1d 60 21 | e7 20 52 28 41 25 2c 30 |%,0)..`!|. R(A%,0|
|00004490| 29 3e 58 6d 61 78 20 8c | 20 58 6d 61 78 3d 52 28 |)>Xmax .| Xmax=R(|
|000044a0| 41 25 2c 30 29 0d 1d 6a | 21 e7 20 52 28 41 25 2c |A%,0)..j|!. R(A%,|
|000044b0| 31 29 3c 59 6d 69 6e 20 | 8c 20 59 6d 69 6e 3d 52 |1)<Ymin |. Ymin=R|
|000044c0| 28 41 25 2c 31 29 0d 1d | 74 21 e7 20 52 28 41 25 |(A%,1)..|t!. R(A%|
|000044d0| 2c 31 29 3e 59 6d 61 78 | 20 8c 20 59 6d 61 78 3d |,1)>Ymax| . Ymax=|
|000044e0| 52 28 41 25 2c 31 29 0d | 1d 7e 21 e7 20 52 28 41 |R(A%,1).|.~!. R(A|
|000044f0| 25 2c 32 29 3c 5a 6d 69 | 6e 20 8c 20 5a 6d 69 6e |%,2)<Zmi|n . Zmin|
|00004500| 3d 52 28 41 25 2c 32 29 | 0d 1d 88 21 e7 20 52 28 |=R(A%,2)|...!. R(|
|00004510| 41 25 2c 32 29 3e 5a 6d | 61 78 20 8c 20 5a 6d 61 |A%,2)>Zm|ax . Zma|
|00004520| 78 3d 52 28 41 25 2c 32 | 29 0d 1d 92 08 ed 20 41 |x=R(A%,2|)..... A|
|00004530| 25 0d 1d 9c 36 44 58 3d | 28 58 6d 69 6e 2b 58 6d |%...6DX=|(Xmin+Xm|
|00004540| 61 78 29 2f 32 3a 44 59 | 3d 28 59 6d 69 6e 2b 59 |ax)/2:DY|=(Ymin+Y|
|00004550| 6d 61 78 29 2f 32 3a 44 | 5a 3d 28 5a 6d 69 6e 2b |max)/2:D|Z=(Zmin+|
|00004560| 5a 6d 61 78 29 2f 32 0d | 1d a6 39 e3 20 41 25 3d |Zmax)/2.|..9. A%=|
|00004570| 31 20 b8 20 41 74 6f 6d | 73 25 3a 54 28 41 25 2c |1 . Atom|s%:T(A%,|
|00004580| 30 29 3d 44 58 3a 54 28 | 41 25 2c 31 29 3d 44 59 |0)=DX:T(|A%,1)=DY|
|00004590| 3a 54 28 41 25 2c 32 29 | 3d 44 5a 3a ed 20 41 25 |:T(A%,2)|=DZ:. A%|
|000045a0| 0d 1d b0 05 cd 0d 1d ba | 0f 52 28 29 3d 52 28 29 |........|.R()=R()|
|000045b0| 2d 54 28 29 0d 1d c4 05 | e1 0d 1d ce 05 3a 0d 1d |-T()....|.....:..|
|000045c0| d8 11 dd 20 f2 64 65 70 | 74 68 5f 73 6f 72 74 0d |... .dep|th_sort.|
|000045d0| 1d e2 0b ea 20 41 25 2c | 42 25 0d 1d ec 13 e3 20 |.... A%,|B%..... |
|000045e0| 41 25 3d 31 20 b8 20 41 | 74 6f 6d 73 25 0d 1d f6 |A%=1 . A|toms%...|
|000045f0| 11 5a 28 41 25 29 3d 52 | 28 41 25 2c 32 29 0d 1e |.Z(A%)=R|(A%,2)..|
|00004600| 00 0f 4f 25 28 41 25 2c | 30 29 3d 41 25 0d 1e 0a |..O%(A%,|0)=A%...|
|00004610| 0e 4f 25 28 41 25 2c 31 | 29 3d 31 0d 1e 14 08 ed |.O%(A%,1|)=1.....|
|00004620| 20 41 25 0d 1e 1e 13 e3 | 20 41 25 3d 31 20 b8 20 | A%.....| A%=1 . |
|00004630| 42 6f 6e 64 73 25 0d 1e | 28 10 42 25 3d 41 25 2b |Bonds%..|(.B%=A%+|
|00004640| 41 74 6f 6d 73 25 0d 1e | 32 2f 5a 28 42 25 29 3d |Atoms%..|2/Z(B%)=|
|00004650| 28 52 28 42 6f 6e 64 25 | 28 41 25 2c 30 29 2c 32 |(R(Bond%|(A%,0),2|
|00004660| 29 2b 52 28 42 6f 6e 64 | 25 28 41 25 2c 31 29 2c |)+R(Bond|%(A%,1),|
|00004670| 32 29 29 2f 32 0d 1e 3c | 0f 4f 25 28 42 25 2c 30 |2))/2..<|.O%(B%,0|
|00004680| 29 3d 42 25 0d 1e 46 0e | 4f 25 28 42 25 2c 31 29 |)=B%..F.|O%(B%,1)|
|00004690| 3d 32 0d 1e 50 08 ed 20 | 41 25 0d 1e 5a 1a 4f 62 |=2..P.. |A%..Z.Ob|
|000046a0| 6a 65 63 74 73 25 3d 41 | 74 6f 6d 73 25 2b 42 6f |jects%=A|toms%+Bo|
|000046b0| 6e 64 73 25 0d 1e 64 1c | f2 73 6f 72 74 28 4f 62 |nds%..d.|.sort(Ob|
|000046c0| 6a 65 63 74 73 25 2c 4f | 25 28 29 2c 5a 28 29 29 |jects%,O|%(),Z())|
|000046d0| 0d 1e 6e 05 e1 0d 1e 78 | 05 3a 0d 1e 82 18 dd 20 |..n....x|.:..... |
|000046e0| f2 73 6f 72 74 28 4e 25 | 2c 4f 25 28 29 2c 5a 28 |.sort(N%|,O%(),Z(|
|000046f0| 29 29 0d 1e 8c 29 ea 20 | 4c 6e 32 2c 54 69 6e 79 |))...). |Ln2,Tiny|
|00004700| 2c 4d 25 2c 4b 25 2c 4a | 25 2c 4c 25 2c 49 25 2c |,M%,K%,J|%,L%,I%,|
|00004710| 4e 4e 25 2c 4c 6f 67 4e | 42 32 25 0d 1e 96 17 f4 |NN%,LogN|B2%.....|
|00004720| 20 53 68 65 6c 6c 73 6f | 72 74 20 72 6f 75 74 69 | Shellso|rt routi|
|00004730| 6e 65 0d 1e a0 11 4c 6e | 32 3d 31 2e 34 34 32 36 |ne....Ln|2=1.4426|
|00004740| 39 35 30 0d 1e aa 0f 54 | 69 6e 79 3d 31 2e 30 45 |950....T|iny=1.0E|
|00004750| 2d 35 0d 1e b4 1d 4c 6f | 67 4e 42 32 25 3d a8 28 |-5....Lo|gNB2%=.(|
|00004760| aa 28 4e 25 29 2a 4c 6e | 32 2b 54 69 6e 79 29 0d |.(N%)*Ln|2+Tiny).|
|00004770| 1e be 09 4d 25 3d 4e 25 | 0d 1e c8 15 e3 20 4e 4e |...M%=N%|..... NN|
|00004780| 25 3d 31 20 b8 20 4c 6f | 67 4e 42 32 25 0d 1e d2 |%=1 . Lo|gNB2%...|
|00004790| 0b 4d 25 3d 4d 25 2f 32 | 0d 1e dc 0c 4b 25 3d 4e |.M%=M%/2|....K%=N|
|000047a0| 25 2d 4d 25 0d 1e e6 0f | e3 20 4a 25 3d 31 20 b8 |%-M%....|. J%=1 .|
|000047b0| 20 4b 25 0d 1e f0 09 49 | 25 3d 4a 25 0d 1e fa 07 | K%....I|%=J%....|
|000047c0| f4 20 33 0d 1f 04 0c 4c | 25 3d 49 25 2b 4d 25 0d |. 3....L|%=I%+M%.|
|000047d0| 1f 0e 15 e7 20 28 5a 28 | 4c 25 29 3c 5a 28 49 25 |.... (Z(|L%)<Z(I%|
|000047e0| 29 29 20 8c 0d 1f 18 12 | c8 94 20 5a 28 49 25 29 |)) .....|.. Z(I%)|
|000047f0| 2c 5a 28 4c 25 29 0d 1f | 22 18 c8 94 20 4f 25 28 |,Z(L%)..|"... O%(|
|00004800| 49 25 2c 30 29 2c 4f 25 | 28 4c 25 2c 30 29 0d 1f |I%,0),O%|(L%,0)..|
|00004810| 2c 18 c8 94 20 4f 25 28 | 49 25 2c 31 29 2c 4f 25 |,... O%(|I%,1),O%|
|00004820| 28 4c 25 2c 31 29 0d 1f | 36 0c 49 25 3d 49 25 2d |(L%,1)..|6.I%=I%-|
|00004830| 4d 25 0d 1f 40 12 e7 20 | 49 25 3e 3d 31 20 8c 20 |M%..@.. |I%>=1 . |
|00004840| 8d 64 7a 5e 0d 1f 4a 05 | cd 0d 1f 54 08 ed 20 4a |.dz^..J.|...T.. J|
|00004850| 25 0d 1f 5e 09 ed 20 4e | 4e 25 0d 1f 68 05 e1 0d |%..^.. N|N%..h...|
|00004860| 1f 72 05 3a 0d 1f 7c 14 | dd 20 f2 64 72 61 77 5f |.r.:..|.|. .draw_|
|00004870| 6d 6f 6c 65 63 75 6c 65 | 0d 1f 86 08 ea 20 41 25 |molecule|..... A%|
|00004880| 0d 1f 90 15 e3 20 41 25 | 3d 31 20 b8 20 4f 62 6a |..... A%|=1 . Obj|
|00004890| 65 63 74 73 25 0d 1f 9a | 27 e7 20 4f 25 28 41 25 |ects%...|'. O%(A%|
|000048a0| 2c 31 29 3d 31 20 8c 20 | f2 64 72 61 77 5f 61 74 |,1)=1 . |.draw_at|
|000048b0| 6f 6d 28 4f 25 28 41 25 | 2c 30 29 29 0d 1f a4 50 |om(O%(A%|,0))...P|
|000048c0| e7 20 4f 25 28 41 25 2c | 31 29 3d 32 20 8c 20 f2 |. O%(A%,|1)=2 . .|
|000048d0| 64 72 61 77 5f 62 6f 6e | 64 28 42 6f 6e 64 25 28 |draw_bon|d(Bond%(|
|000048e0| 4f 25 28 41 25 2c 30 29 | 2d 41 74 6f 6d 73 25 2c |O%(A%,0)|-Atoms%,|
|000048f0| 30 29 2c 42 6f 6e 64 25 | 28 4f 25 28 41 25 2c 30 |0),Bond%|(O%(A%,0|
|00004900| 29 2d 41 74 6f 6d 73 25 | 2c 31 29 29 0d 1f ae 08 |)-Atoms%|,1))....|
|00004910| ed 20 41 25 0d 1f b8 05 | e1 0d 1f c2 05 3a 0d 1f |. A%....|.....:..|
|00004920| cc 14 dd 20 f2 64 72 61 | 77 5f 61 74 6f 6d 28 41 |... .dra|w_atom(A|
|00004930| 25 29 0d 1f d6 1c ea 20 | 42 25 2c 58 2c 59 2c 44 |%)..... |B%,X,Y,D|
|00004940| 52 2c 52 2c 42 61 63 6b | 25 2c 43 6f 6c 25 0d 1f |R,R,Back|%,Col%..|
|00004950| e0 11 52 3d a4 72 61 64 | 69 75 73 28 41 25 29 0d |..R=.rad|ius(A%).|
|00004960| 1f ea 13 e7 20 53 65 6c | 65 63 74 25 28 41 25 29 |.... Sel|ect%(A%)|
|00004970| 20 8c 0d 1f f4 12 42 61 | 63 6b 25 3d 31 34 3a 44 | .....Ba|ck%=14:D|
|00004980| 52 3d 31 30 0d 1f fe 05 | cc 0d 20 08 10 42 61 63 |R=10....|.. ..Bac|
|00004990| 6b 25 3d 37 3a 44 52 3d | 35 0d 20 12 05 cd 0d 20 |k%=7:DR=|5. .... |
|000049a0| 1c 14 43 6f 6c 25 3d a4 | 63 6f 6c 6f 75 72 28 41 |..Col%=.|colour(A|
|000049b0| 25 29 0d 20 26 17 58 3d | 52 28 41 25 2c 30 29 3a |%). &.X=|R(A%,0):|
|000049c0| 59 3d 52 28 41 25 2c 31 | 29 0d 20 30 0b e6 20 42 |Y=R(A%,1|). 0.. B|
|000049d0| 61 63 6b 25 0d 20 3a 20 | c8 8f 20 c8 90 20 a4 78 |ack%. : |.. .. .x|
|000049e0| 28 58 29 2c a4 79 28 59 | 29 2c 52 2a 53 63 61 6c |(X),.y(Y|),R*Scal|
|000049f0| 65 2b 44 52 0d 20 44 2a | e7 20 43 6f 6c 25 3e 3d |e+DR. D*|. Col%>=|
|00004a00| 31 36 20 8c 20 e6 20 31 | 36 2a 28 43 6f 6c 25 2d |16 . . 1|6*(Col%-|
|00004a10| 31 35 29 2c 30 20 8b 20 | e6 20 43 6f 6c 25 0d 20 |15),0 . |. Col%. |
|00004a20| 4e 1d c8 8f 20 c8 90 20 | a4 78 28 58 29 2c a4 79 |N... .. |.x(X),.y|
|00004a30| 28 59 29 2c 52 2a 53 63 | 61 6c 65 0d 20 58 05 e1 |(Y),R*Sc|ale. X..|
|00004a40| 0d 20 62 05 3a 0d 20 6c | 17 dd 20 f2 64 72 61 77 |. b.:. l|.. .draw|
|00004a50| 5f 62 6f 6e 64 28 41 25 | 2c 42 25 29 0d 20 76 20 |_bond(A%|,B%). v |
|00004a60| ea 20 43 25 2c 52 31 2c | 52 32 2c 62 2c 78 2c 79 |. C%,R1,|R2,b,x,y|
|00004a70| 2c 75 2c 76 2c 43 31 25 | 2c 43 32 25 0d 20 80 0f |,u,v,C1%|,C2%. ..|
|00004a80| e7 20 64 72 69 76 65 72 | 25 20 8c 0d 20 8a 3a e7 |. driver|% .. .:.|
|00004a90| 20 28 41 25 3d 42 53 25 | 20 80 20 42 25 3d 42 45 | (A%=BS%| . B%=BE|
|00004aa0| 25 29 20 84 20 28 41 25 | 3d 42 45 25 20 80 20 42 |%) . (A%|=BE% . B|
|00004ab0| 25 3d 42 53 25 29 20 8c | 20 43 25 3d 31 30 20 8b |%=BS%) .| C%=10 .|
|00004ac0| 20 43 25 3d 37 0d 20 94 | 05 cc 0d 20 9e 08 43 25 | C%=7. .|... ..C%|
|00004ad0| 3d 37 0d 20 a8 05 cd 0d | 20 b2 08 e6 20 43 25 0d |=7. ....| ... C%.|
|00004ae0| 20 bc 20 43 31 28 29 3d | 52 28 41 25 2c 30 29 2c | . C1()=|R(A%,0),|
|00004af0| 52 28 41 25 2c 31 29 2c | 52 28 41 25 2c 32 29 0d |R(A%,1),|R(A%,2).|
|00004b00| 20 c6 20 43 32 28 29 3d | 52 28 42 25 2c 30 29 2c | . C2()=|R(B%,0),|
|00004b10| 52 28 42 25 2c 31 29 2c | 52 28 42 25 2c 32 29 0d |R(B%,1),|R(B%,2).|
|00004b20| 20 d0 21 52 31 3d a4 72 | 61 64 69 75 73 28 41 25 | .!R1=.r|adius(A%|
|00004b30| 29 3a 52 32 3d a4 72 61 | 64 69 75 73 28 42 25 29 |):R2=.ra|dius(B%)|
|00004b40| 0d 20 da 1e 6e 28 29 3d | 43 32 28 29 2d 43 31 28 |. ..n()=|C2()-C1(|
|00004b50| 29 3a 6e 28 29 3d 6e 28 | 29 2f 83 6e 28 29 0d 20 |):n()=n(|)/.n(). |
|00004b60| e4 1e 44 31 28 29 3d 52 | 31 2a 6e 28 29 3a 44 31 |..D1()=R|1*n():D1|
|00004b70| 28 29 3d 44 31 28 29 2b | 43 31 28 29 0d 20 ee 1f |()=D1()+|C1(). ..|
|00004b80| 44 32 28 29 3d 2d 52 32 | 2a 6e 28 29 3a 44 32 28 |D2()=-R2|*n():D2(|
|00004b90| 29 3d 44 32 28 29 2b 43 | 32 28 29 0d 20 f8 1e 6e |)=D2()+C|2(). ..n|
|00004ba0| 28 29 3d 44 32 28 29 2d | 44 31 28 29 3a 6e 28 29 |()=D2()-|D1():n()|
|00004bb0| 3d 6e 28 29 2f 83 6e 28 | 29 0d 21 02 1d 62 3d 30 |=n()/.n(|).!..b=0|
|00004bc0| 2e 30 33 3a 78 3d 2d 62 | 2a 6e 28 31 29 3a 79 3d |.03:x=-b|*n(1):y=|
|00004bd0| 62 2a 6e 28 30 29 0d 21 | 0c 55 ec 20 a4 78 28 44 |b*n(0).!|.U. .x(D|
|00004be0| 31 28 30 29 2d 78 29 2c | a4 79 28 44 31 28 31 29 |1(0)-x),|.y(D1(1)|
|00004bf0| 2d 79 29 3a ec 20 a4 78 | 28 44 31 28 30 29 2b 78 |-y):. .x|(D1(0)+x|
|00004c00| 29 2c a4 79 28 44 31 28 | 31 29 2b 79 29 3a f0 20 |),.y(D1(|1)+y):. |
|00004c10| 26 37 35 2c a4 78 28 44 | 32 28 30 29 2b 78 29 2c |&75,.x(D|2(0)+x),|
|00004c20| a4 79 28 44 32 28 31 29 | 2b 79 29 0d 21 16 05 e1 |.y(D2(1)|+y).!...|
|00004c30| 0d 21 20 05 3a 0d 21 2a | 17 dd 20 a4 78 28 58 29 |.! .:.!*|.. .x(X)|
|00004c40| 3d 36 34 30 2b 53 63 61 | 6c 65 2a 58 0d 21 34 05 |=640+Sca|le*X.!4.|
|00004c50| 3a 0d 21 3e 17 dd 20 a4 | 79 28 59 29 3d 35 31 32 |:.!>.. .|y(Y)=512|
|00004c60| 2b 53 63 61 6c 65 2a 59 | 0d 21 48 05 3a 0d 21 52 |+Scale*Y|.!H.:.!R|
|00004c70| 11 dd 20 a4 72 61 64 69 | 75 73 28 41 25 29 0d 21 |.. .radi|us(A%).!|
|00004c80| 5c 15 c8 8e 20 94 28 54 | 79 70 65 25 28 41 25 29 |\... .(T|ype%(A%)|
|00004c90| 29 20 ca 0d 21 66 11 c9 | 20 31 2c 32 3a 20 3d 30 |) ..!f..| 1,2: =0|
|00004ca0| 2e 32 35 30 0d 21 70 1b | c9 20 35 2c 32 30 2c 32 |.250.!p.|. 5,20,2|
|00004cb0| 31 2c 32 33 2c 32 34 3a | 20 3d 30 2e 31 32 30 0d |1,23,24:| =0.120.|
|00004cc0| 21 7a 11 c9 20 36 2c 37 | 3a 20 3d 30 2e 32 33 30 |!z.. 6,7|: =0.230|
|00004cd0| 0d 21 84 17 c9 20 38 2c | 39 2c 31 30 2c 33 37 3a |.!... 8,|9,10,37:|
|00004ce0| 20 3d 30 2e 32 33 30 0d | 21 8e 0f c9 20 31 31 3a | =0.230.|!... 11:|
|00004cf0| 20 3d 30 2e 32 30 0d 21 | 98 0f c9 20 31 32 3a 20 | =0.20.!|... 12: |
|00004d00| 3d 30 2e 34 30 0d 21 a2 | 0f c9 20 31 33 3a 20 3d |=0.40.!.|.. 13: =|
|00004d10| 30 2e 35 30 0d 21 ac 0f | c9 20 31 34 3a 20 3d 30 |0.50.!..|. 14: =0|
|00004d20| 2e 36 30 0d 21 b6 05 7f | 0d 21 c0 0a 3d 30 2e 32 |.60.!...|.!..=0.2|
|00004d30| 30 30 0d 21 ca 05 cb 0d | 21 d4 05 3a 0d 21 de 11 |00.!....|!..:.!..|
|00004d40| dd 20 a4 63 6f 6c 6f 75 | 72 28 41 25 29 0d 21 e8 |. .colou|r(A%).!.|
|00004d50| 15 c8 8e 20 94 28 54 79 | 70 65 25 28 41 25 29 29 |... .(Ty|pe%(A%))|
|00004d60| 20 ca 0d 21 f2 0d c9 20 | 31 2c 32 3a 20 3d 33 0d | ..!... |1,2: =3.|
|00004d70| 21 fc 15 c9 20 35 2c 32 | 31 2c 32 33 2c 32 34 3a |!... 5,2|1,23,24:|
|00004d80| 20 3d 31 32 0d 22 06 0e | c9 20 36 2c 37 3a 20 3d | =12."..|. 6,7: =|
|00004d90| 31 31 0d 22 10 0d c9 20 | 32 30 3a 20 20 3d 39 0d |11."... |20: =9.|
|00004da0| 22 1a 0d c9 20 31 31 3a | 20 3d 31 39 0d 22 24 0d |"... 11:| =19."$.|
|00004db0| c9 20 31 32 3a 20 3d 31 | 37 0d 22 2e 0d c9 20 31 |. 12: =1|7."... 1|
|00004dc0| 33 3a 20 3d 31 38 0d 22 | 38 0d c9 20 31 34 3a 20 |3: =18."|8.. 14: |
|00004dd0| 3d 31 36 0d 22 42 15 c9 | 20 38 2c 39 2c 31 30 2c |=16."B..| 8,9,10,|
|00004de0| 33 37 20 3a 20 3d 31 35 | 0d 22 4c 05 7f 0d 22 56 |37 : =15|."L..."V|
|00004df0| 06 3d 32 0d 22 60 05 cb | 0d 22 6a 05 3a 0d 22 74 |.=2."`..|."j.:."t|
|00004e00| 1a dd 20 a4 65 64 69 74 | 28 78 25 2c 79 25 2c 62 |.. .edit|(x%,y%,b|
|00004e10| 75 74 74 6f 6e 25 29 0d | 22 7e 1e ea 20 58 2c 59 |utton%).|"~.. X,Y|
|00004e20| 2c 78 30 25 2c 79 30 25 | 2c 41 25 2c 43 25 2c 44 |,x0%,y0%|,A%,C%,D|
|00004e30| 2c 44 6d 69 6e 0d 22 88 | 0d 64 72 69 76 65 72 25 |,Dmin.".|.driver%|
|00004e40| 3d a3 0d 22 92 1e e7 20 | b0 78 25 2c 79 25 29 3d |=.."... |.x%,y%)=|
|00004e50| 30 20 84 20 b0 78 25 2c | 79 25 29 3d 36 33 20 8c |0 . .x%,|y%)=63 .|
|00004e60| 0d 22 9c 22 53 65 6c 65 | 63 74 25 28 29 3d 30 3a |."."Sele|ct%()=0:|
|00004e70| 43 25 3d 30 3a 6c 61 73 | 74 73 65 6c 65 63 74 25 |C%=0:las|tselect%|
|00004e80| 3d 30 0d 22 a6 05 cc 0d | 22 b0 27 74 65 6d 70 25 |=0."....|".'temp%|
|00004e90| 21 30 3d 6d 61 69 6e 25 | 3a c8 99 20 57 5f 47 65 |!0=main%|:.. W_Ge|
|00004ea0| 74 57 49 6e 66 6f 25 2c | 2c 74 65 6d 70 25 0d 22 |tWInfo%,|,temp%."|
|00004eb0| ba 18 78 30 25 3d 74 65 | 6d 70 25 21 34 2d 74 65 |..x0%=te|mp%!4-te|
|00004ec0| 6d 70 25 21 32 30 0d 22 | c4 19 79 30 25 3d 74 65 |mp%!20."|..y0%=te|
|00004ed0| 6d 70 25 21 31 36 2d 74 | 65 6d 70 25 21 32 34 0d |mp%!16-t|emp%!24.|
|00004ee0| 22 ce 18 58 3d 28 78 25 | 2d 78 30 25 2d 36 34 30 |"..X=(x%|-x0%-640|
|00004ef0| 29 2f 53 63 61 6c 65 0d | 22 d8 18 59 3d 28 79 25 |)/Scale.|"..Y=(y%|
|00004f00| 2d 79 30 25 2b 35 31 32 | 29 2f 53 63 61 6c 65 0d |-y0%+512|)/Scale.|
|00004f10| 22 e2 0c 44 6d 69 6e 3d | 31 45 36 0d 22 ec 13 e3 |"..Dmin=|1E6."...|
|00004f20| 20 41 25 3d 31 20 b8 20 | 41 74 6f 6d 73 25 0d 22 | A%=1 . |Atoms%."|
|00004f30| f6 13 44 3d a4 64 69 73 | 74 28 41 25 2c 58 2c 59 |..D=.dis|t(A%,X,Y|
|00004f40| 29 0d 23 00 1b e7 20 44 | 3c 44 6d 69 6e 20 8c 20 |).#... D|<Dmin . |
|00004f50| 44 6d 69 6e 3d 44 3a 43 | 25 3d 41 25 0d 23 0a 08 |Dmin=D:C|%=A%.#..|
|00004f60| ed 20 41 25 0d 23 14 30 | e7 20 a4 6a 6f 69 6e 65 |. A%.#.0|. .joine|
|00004f70| 64 28 43 25 2c 6c 61 73 | 74 73 65 6c 65 63 74 25 |d(C%,las|tselect%|
|00004f80| 29 20 80 20 6c 61 73 74 | 73 65 6c 65 63 74 25 3c |) . last|select%<|
|00004f90| 3e 30 20 8c 0d 23 1e 1a | 42 53 25 3d 43 25 3a 42 |>0 ..#..|BS%=C%:B|
|00004fa0| 45 25 3d 6c 61 73 74 73 | 65 6c 65 63 74 25 0d 23 |E%=lasts|elect%.#|
|00004fb0| 28 25 f2 69 6e 69 74 64 | 72 69 76 65 72 28 6c 61 |(%.initd|river(la|
|00004fc0| 73 74 73 65 6c 65 63 74 | 25 2c 43 25 2c 41 6e 67 |stselect|%,C%,Ang|
|00004fd0| 6c 65 29 0d 23 32 0f 53 | 65 6c 65 63 74 25 28 29 |le).#2.S|elect%()|
|00004fe0| 3d a3 0d 23 3c 0d 64 72 | 69 76 65 72 25 3d b9 0d |=..#<.dr|iver%=..|
|00004ff0| 23 46 08 43 25 3d 30 0d | 23 50 05 cc 0d 23 5a 0f |#F.C%=0.|#P...#Z.|
|00005000| 53 65 6c 65 63 74 25 28 | 29 3d a3 0d 23 64 42 e7 |Select%(|)=..#dB.|
|00005010| 20 62 75 74 74 6f 6e 25 | 3d 34 20 84 20 62 75 74 | button%|=4 . but|
|00005020| 74 6f 6e 25 3d 31 20 8c | 20 53 65 6c 65 63 74 25 |ton%=1 .| Select%|
|00005030| 28 43 25 29 3d b9 3a 53 | 65 6c 65 63 74 25 28 6c |(C%)=.:S|elect%(l|
|00005040| 61 73 74 73 65 6c 65 63 | 74 25 29 3d b9 0d 23 6e |astselec|t%)=..#n|
|00005050| 05 cd 0d 23 78 05 cd 0d | 23 82 12 6c 61 73 74 73 |...#x...|#..lasts|
|00005060| 65 6c 65 63 74 25 3d 43 | 25 0d 23 8c 0b f2 72 65 |elect%=C|%.#...re|
|00005070| 63 61 6c 63 0d 23 96 17 | f2 75 70 64 61 74 65 5f |calc.#..|.update_|
|00005080| 77 69 6e 64 28 6d 61 69 | 6e 25 29 0d 23 a0 07 3d |wind(mai|n%).#..=|
|00005090| 43 25 0d 23 aa 05 3a 0d | 23 b4 14 dd 20 a4 6a 6f |C%.#..:.|#... .jo|
|000050a0| 69 6e 65 64 28 42 25 2c | 43 25 29 0d 23 be 0b ea |ined(B%,|C%).#...|
|000050b0| 20 41 25 2c 4a 25 0d 23 | c8 16 e7 20 42 25 3e 43 | A%,J%.#|... B%>C|
|000050c0| 25 20 8c 20 c8 94 20 42 | 25 2c 43 25 0d 23 d2 08 |% . .. B|%,C%.#..|
|000050d0| 4a 25 3d a3 0d 23 dc 0e | e3 20 41 25 3d 30 20 b8 |J%=..#..|. A%=0 .|
|000050e0| 20 33 0d 23 e6 2c e7 20 | 43 6f 6e 25 28 42 25 2c | 3.#.,. |Con%(B%,|
|000050f0| 41 25 29 3d 43 25 20 84 | 20 43 6f 6e 25 28 43 25 |A%)=C% .| Con%(C%|
|00005100| 2c 41 25 29 3d 42 25 20 | 8c 20 4a 25 3d b9 0d 23 |,A%)=B% |. J%=..#|
|00005110| f0 08 ed 20 41 25 0d 23 | fa 07 3d 4a 25 0d 24 04 |... A%.#|..=J%.$.|
|00005120| 05 3a 0d 24 0e 19 dd 20 | a4 64 69 73 74 28 41 25 |.:.$... |.dist(A%|
|00005130| 2c 58 2c 59 29 3a ea 20 | 55 2c 56 0d 24 18 1b 55 |,X,Y):. |U,V.$..U|
|00005140| 3d 52 28 41 25 2c 30 29 | 2d 58 3a 56 3d 52 28 41 |=R(A%,0)|-X:V=R(A|
|00005150| 25 2c 31 29 2d 59 0d 24 | 22 0c 3d 55 2a 55 2b 56 |%,1)-Y.$|".=U*U+V|
|00005160| 2a 56 0d 24 2c 05 3a 0d | 24 36 10 dd 20 a4 77 69 |*V.$,.:.|$6.. .wi|
|00005170| 6d 70 65 72 72 6f 72 0d | 24 40 0d 21 62 6c 6f 63 |mperror.|$@.!bloc|
|00005180| 6b 25 3d 9f 0d 24 4a 24 | 24 28 62 6c 6f 63 6b 25 |k%=..$J$|$(block%|
|00005190| 2b 34 29 3d f6 24 2b 22 | 20 61 74 20 6c 69 6e 65 |+4)=.$+"| at line|
|000051a0| 20 22 2b c3 9e 2b bd 30 | 0d 24 54 36 c8 99 20 22 | "+..+.0|.$T6.. "|
|000051b0| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|000051c0| 22 2c 62 6c 6f 63 6b 25 | 2c 33 2c 74 69 74 6c 65 |",block%|,3,title|
|000051d0| 24 20 b8 20 2c 72 65 73 | 70 6f 6e 73 65 25 0d 24 |$ . ,res|ponse%.$|
|000051e0| 5e 26 e7 20 72 65 73 70 | 6f 6e 73 65 25 3d 32 20 |^&. resp|onse%=2 |
|000051f0| 8c 20 f2 63 6c 6f 73 65 | 64 6f 77 6e 3a 3d b9 20 |. .close|down:=. |
|00005200| 8b 20 3d a3 0d 24 68 05 | 3a 0d 24 72 10 dd 20 f2 |. =..$h.|:.$r.. .|
|00005210| 63 6c 6f 73 65 64 6f 77 | 6e 0d 24 7c 14 f2 64 65 |closedow|n.$|..de|
|00005220| 66 61 75 6c 74 5f 70 6f | 69 6e 74 65 72 0d 24 86 |fault_po|inter.$.|
|00005230| 12 24 62 6c 6f 63 6b 25 | 3d 22 54 41 53 4b 22 0d |.$block%|="TASK".|
|00005240| 24 90 25 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |$.%.. "W|imp_Clos|
|00005250| 65 44 6f 77 6e 22 2c 74 | 61 73 6b 25 2c 21 62 6c |eDown",t|ask%,!bl|
|00005260| 6f 63 6b 25 0d 24 9a 05 | e1 0d 24 a4 05 3a 0d 24 |ock%.$..|..$..:.$|
|00005270| ae 0f dd 20 f2 6d 6f 61 | 6e 28 54 24 29 0d 24 b8 |... .moa|n(T$).$.|
|00005280| 1f 21 62 6c 6f 63 6b 25 | 3d 30 3a 24 28 62 6c 6f |.!block%|=0:$(blo|
|00005290| 63 6b 25 2b 34 29 3d 54 | 24 2b bd 30 0d 24 c2 2b |ck%+4)=T|$+.0.$.+|
|000052a0| c8 99 20 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 |.. "Wimp|_ReportE|
|000052b0| 72 72 6f 72 22 2c 62 6c | 6f 63 6b 25 2c 26 31 35 |rror",bl|ock%,&15|
|000052c0| 2c 74 69 74 6c 65 24 0d | 24 cc 05 e1 0d 24 d6 05 |,title$.|$....$..|
|000052d0| 3a 0d 24 e0 13 dd 20 a4 | 5f 52 6f 75 6e 64 28 58 |:.$... .|_Round(X|
|000052e0| 2c 44 25 29 0d 24 ea 1a | ea 20 41 25 2c 45 25 2c |,D%).$..|. A%,E%,|
|000052f0| 41 24 2c 42 24 2c 45 24 | 2c 50 25 2c 52 25 0d 24 |A$,B$,E$|,P%,R%.$|
|00005300| f4 09 50 25 3d 40 25 0d | 24 fe 1b 40 25 3d 26 30 |..P%=@%.|$..@%=&0|
|00005310| 31 30 32 30 30 30 41 2b | 32 35 36 2a 28 44 25 2b |102000A+|256*(D%+|
|00005320| 31 29 0d 25 08 0b 41 24 | 3d c3 28 58 29 0d 25 12 |1).%..A$|=.(X).%.|
|00005330| 0f 41 25 3d a7 41 24 2c | 22 2e 22 29 0d 25 1c 0f |.A%=.A$,|".").%..|
|00005340| 45 25 3d a7 41 24 2c 22 | 45 22 29 0d 25 26 0c e7 |E%=.A$,"|E").%&..|
|00005350| 20 45 25 3e 30 20 8c 0d | 25 30 0e 45 24 3d c1 41 | E%>0 ..|%0.E$=.A|
|00005360| 24 2c 45 25 29 0d 25 3a | 10 41 24 3d c0 41 24 2c |$,E%).%:|.A$=.A$,|
|00005370| 45 25 2d 31 29 0d 25 44 | 05 cc 0d 25 4e 09 45 24 |E%-1).%D|...%N.E$|
|00005380| 3d 22 22 0d 25 58 05 cd | 0d 25 62 0c e7 20 41 25 |="".%X..|.%b.. A%|
|00005390| 3e 30 20 8c 0d 25 6c 13 | 52 25 3d a9 28 c1 41 24 |>0 ..%l.|R%=.(.A$|
|000053a0| 2c 41 25 2b 31 29 29 0d | 25 76 20 42 24 3d c0 41 |,A%+1)).|%v B$=.A|
|000053b0| 24 2c 41 25 2b 44 25 29 | 2b c4 44 25 2d 52 25 2c |$,A%+D%)|+.D%-R%,|
|000053c0| 22 30 22 29 2b 45 24 0d | 25 80 05 cc 0d 25 8a 19 |"0")+E$.|%....%..|
|000053d0| 42 24 3d 41 24 2b 22 2e | 22 2b c4 44 25 2c 22 30 |B$=A$+".|"+.D%,"0|
|000053e0| 22 29 2b 45 24 0d 25 94 | 05 cd 0d 25 9e 09 40 25 |")+E$.%.|...%..@%|
|000053f0| 3d 50 25 0d 25 a8 07 3d | 42 24 0d 25 b2 05 3a 0d |=P%.%..=|B$.%..:.|
|00005400| 25 bc 12 dd 20 f2 67 65 | 74 6d 6f 64 65 69 6e 66 |%... .ge|tmodeinf|
|00005410| 6f 0d 25 c6 0b 6d 6f 64 | 65 25 3d eb 0d 25 d0 27 |o.%..mod|e%=..%.'|
|00005420| c8 99 20 4f 53 5f 52 64 | 56 61 72 25 2c 6d 6f 64 |.. OS_Rd|Var%,mod|
|00005430| 65 25 2c 34 20 b8 20 2c | 2c 58 45 69 67 46 61 63 |e%,4 . ,|,XEigFac|
|00005440| 74 6f 72 0d 25 da 42 c8 | 99 20 22 57 69 6d 70 5f |tor.%.B.|. "Wimp_|
|00005450| 52 65 61 64 50 69 78 54 | 72 61 6e 73 22 2c 26 31 |ReadPixT|rans",&1|
|00005460| 30 30 2c 73 70 2c 22 65 | 6e 6c 61 72 67 65 22 2c |00,sp,"e|nlarge",|
|00005470| 2c 2c 2c 66 61 63 74 6f | 72 73 25 2c 70 69 78 74 |,,,facto|rs%,pixt|
|00005480| 72 61 6e 73 25 0d 25 e4 | 05 e1 0d ff |rans%.%.|.... |
+--------+-------------------------+-------------------------+--------+--------+